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PREFACE 


The  Service,  Inventory  and  Maintenance  System  (SIMS)  is  a 
computerized  information  system  designed  to  assist  urban  transit 
systems  in  the  management  of  their  bus  service,  maintenance 
and  inventory  activities.  The  SIMS  system  was  developed  by 
the  MITRE  Corporation  under  the  sponsorship  of  the  Office  of 
Transit  Management,  Urban  Mass  Transportation  Administration. 

SIMS  comprises  three  interrelated  program  modules.  The 
Service/Unit  - Change  module  is  designed  to  assist  transit  manage- 
ment in  the  scheduling  and  control  of  the  vehicle  servicing  and 
maintenance  operations.  Labor  and  cost  reports  on  the  bus 
maintenance  activity  are  produced  by  the  Repair-Cost  module. 

The  Inventory  module  provides  management  and  financial  control 
reports  on  all  transit  inventory  activity  such  parts  issues, 
purchase  orders  and  receipts. 
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1.0  INTRODUCTION 


Under  the  sponsorship  of  the  Urban  Mass  Transportation  Administration 
(UMTA) , an  automated  system  to  record,  analyze,  and  report  on  the  main- 
tenance activities  of  urban  bus  systems  has  been  developed.  This  in- 
formation system  is  the  Service,  Inventory,  and  Maintenance  System  (SIMS). 

The  Inventory  System  is  one  component  of  SIMS.  It  is  designed 
to  provide  management  with  information  that  will  assist  in  the  control 
of  inventory  and  support  the  purchasing  function.  Records  of  the  mate- 
rials used  in  the  repair  of  buses  are  maintained  as  a by-product  of  the 
system.  These  records  become,  in  turn,  source  information  to  the  SIMS 
Repair  Cost  System. 

The  description  of  the  Inventory  System  contained  in  this  document 
includes  details  of  inputs,  reports,  files,  procedures,  and  computer 
program  functions.  The  last  section  describes  briefly  the  steps  neces- 
sary to  the  installation  and  initial  implementation  of  the  system. 

To  facilitate  the  implementation  of  the  SIMS  Inventory  System  on 
various  object  computers,  the  software  has  been  written  in  ANSI  COBOL 
and  utilizes  the  report  writer  feature  for  most  of  the  report  generators. 
The  functions  of  each  program  are  described  in  detail  in  this  document. 

A source  listing  of  each  program  and  of  the  copy  library  is  provided 
in  Supplement  I to  this  document. 

The  system  has  been  implemented  at  Alameda-Contra  Costa  Transit 
District  (ACTD)  and  Dallas  Transit  System  (DTS)  under  demonstrations 
sponsored  by  UMTA.  In  this  document,  references  are  made  to  the  details 
of  system  implementation  at  these  two  locations.  These  references 
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illustrate  the  user-specific  features  of  the  system.  At  both  locations, 
the  system  is  run  on  a service  bureau  basis.  The  object  computer  for 
ACTD  is  an  IBM  360/65  and  for  DTS,  an  IBM  370/145. 
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2.0  OVERALL  DESCRIPTION  OF  THE  SIMS  INVENTORY  SYSTEM 


The  SIMS  Inventory  System  consists  of  programs,  files,  and  pro- 
cedures to  accept  and  store  transaction  data  and  to  produce  reports 
that  can  be  used  by  management  to  maintain  effective  purchasing  and 
stores  operations.  The  majority  of  the  reports  are  on-demand  reports. 

Figure  2.0-1  is  a flowchart  that  describes  the  system  without 
reference  to  the  on-demand  reports.  Input  consists  of  date  cards.  Job 
Control  Language  (JCL)  cards,  and  a transaction  card  file.  This  in- 
put is  normally  submitted  weekly.  The  system  is  designed  to  accept  a 
transaction  tape  file  as  an  alternative  to  the  card  file. 

The  majority  of  the  transactions  entered  in  the  Inventory  System 
are  records  of  the  day-by-day  activities  of  the  purchasing  and  stores 
functions.  Transactions  are  for  items  under  inventory  control,  free 
stores,  and  direct  charge  materials.  Each  transaction  is  identified  by 
a two-character  code.  The  first  character  identifies  the  type  of  trans- 
action; the  second  identifies  the  type  of  file  updating  to  be  performed. 

The  two  sets  of  characters  from  which  transaction  codes  are  formed  are 
listed  in  Table  2.0-1.  Not  all  combinations  of  the  characters  listed 
are  valid  transaction  codes.  The  valid  codes  are  defined  in  Section  4.0. 
With  the  exception  of  vendor  reference  data  and  inventory  system  constants, 
all  transactions  update  an  Inventory  Master  File  and  are  also  stored  in  a 
Transaction  History  File  for  future  reference. 

The  system  maintains  an  Inventory  disk  pack,  ACTINV,  and  two  tape 
files.  The  latter  are  the  Inventory  Master  File,  CN17 44 . INV.M. INVENT ( ), 
and  the  Transaction  History  File,  CN1744. INV.M. TRANTAPE(  ).  The  disk 
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FIGURE  2.0-1 

SIMS  INVENTORY  SYSTEM  FLOWCHART 
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pack  contains  the  other  system  files  and  program  libraries.  Major 
system  files  are  listed  in  Table  2.0-2. 

The  reports  produced  by  the  system  are  of  two  types.  The  first 
type  is  produced  automatically  by  the  system  whenever  the  Inventory 
Master  File  is  updated.  The  second  type  is  on-demand  reports.  These 
are  optional  reports  for  which  the  user  must  make  a request.  They  may 
be  generated  during  the  weekly  run  or  on  a stand-alone  basis.  The 
reports  are  listed  in  Table  2.0-3;  the  identity  of  each  report  generator 
is  included  in  the  table. 

The  SIMS  Inventory  System  has  been  implemented  at  ACTD  and  DTS 
under  demonstrations  sponsored  by  UMTA.  In  both  applications,  the 
system  has  been  installed  at  independent  computer  centers.  For  ACTD, 
the  system  has  been  installed  at  a commercial  service  bureau.  For  DTS, 
the  system  is  installed  at  the  municipal  computer  center.  The  transit 
property  supplies  the  weekly  file  of  transactions.  ACTD  also  supplies 
the  job  deck;  at  DTS,  the  job  deck  is  prepared  at  the  computer  center. 
The  job  deck  includes  date  cards  that  control  report  generation  and  JCL 
cards  that  invoke  stored  procedures  to  execute  the  necessary  programs. 
These  procedures  are  specific  to  the  transit  property  and  to  the  com- 
puter center,  although  there  are  similiarities  in  their  content. 
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TABLE  2.0-1 


TRANSACTION  CODES 

First  Character 

Transaction  Type 

A 

Inventory  item  characteristics 

B 

Inventory  item  detailed  description 

C 

Vendor  reference  data 

D 

Nominal  division  stock  level 

E 

Average  unit  price 

F 

Inventory  system  constants 

0 

Purchase  order 

1 

Return  to  stores 

2 

Positive  inventory  quantity  adjustment 

3 

Negative  inventory  quantity  adjustment 

4 

Disposal  of  surplus  materials 

6 

Materials  receipt 

7 

Return  to  vendor 

8 

Materials  issue 

9 

Inventory  value  adjustment 

Second  Character 

Updating  Function 

A 

Create  or  modify  file  record  except 
subtraction  of  transaction  quantity 
data  from  file  quantity  data 

N 

Subtract  transaction  quantity  data 
from  file  quantity  data 

X 

Delete  the  record 
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TABLE  2.0-2 


MAJOR  SIMS 

INVENTORY  SYSTEM  FILES 

File  Name 

Data  Set  Name 

Inventory  Master  File 

M.  INVENT ( ) 

Inventory  Class  Master  File 

M.INVCLASS( 

) 

Current  Transaction  File 

M.TRANDISK( 

) 

Transaction  History  File 

M.TRANTAPE( 

) 

Suspense  File 

SUSPFILE(  ) 

Inventory  Constants  File 

S. CONST 

Vendor  Reference  File 

M.  VENDOR 

Notes ; 


(a)  All  data  set  names  are  prefixed  by  'CN1744.INV'. 

(b)  ( ) indicates  that  the  file  is  a generation  data 
set . 
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TABLE  2.0-3 


SIMS  INVENTORY  REPORTS 


Report  Title 

Report  Type 

Generating  Program 

Materials  Transaction  History 

W or  R 

RPOIOC  or  RPOIOD 

Reorder  Notification 

W 

RPOII 

Follow-up  Reorder  Notification 

W 

RPOll 

Receiving  Report 

W 

RP060 

Division  Stock  Replacement 

W 

RP016 

Unfilled  Purchase  Orders  Report 

R 

RP013 

Outstanding  Purchase  Orders 
Report 

R 

RP022 

Vendor  Performance  Report 

R 

RP0I4 

Stock  Status  Report 

R 

RP017 

Low  Usage  Materials  Items 

R 

RP018 

Inventory  Activity  Report 

R 

RP020 

Inventory  Activity  Abstract 

R 

RP020 

Inventory  of  Division  Stock 

R 

INVDIV 

Note:  Report  types  are: 

(a)  W = Generated  automatically  during  weekly  run;  and 

(b)  R = Requested  by  user 
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3.0  INVENTORY  SYSTEM  OUTPUTS 


Outputs  of  the  SIMS  Inventory  System  can  be  divided  into  five 
classes : 

(a)  User  Reports;  There  are  14  user  reports  that  can  be 
generated  by  the  Inventory  System.  These  reports  are 
listed  in  Table  3.0-1.  They  are  designed  to  provide 
management  with  information  necessary  to  an  effective 
purchasing  and  inventory  operation.  The  reports  are 
designated  as  either: 

(1)  Weekly  reports,  which  are  generated  automatically 
each  time  the  system  is  run,  or 

(2)  Monthly  or  on-demand  reports,  produced  on  request 
by  the  user. 

(b)  Edit  Reports:  These  reports  are  designed  to  alert 

the  user  to  the  entry  of  incorrect  information  into 
the  system. 

(c)  File  Listings:  Reports  have  been  designed  to  display 

the  records  contained  in  the  Inventory  Master  File  and 
in  the  Vendor  Reference  File.  These  listings  provide 
the  user  with  a capability  to  verify  that  those  records 
are  correct. 

(d)  Error  Messages:  These  messages  are  designed  to  indicate 

to  system  operators  the  cause  of  system  malfunctions. 

(s)  Card  Decks:  A card  deck  is  generated  by  one  program  in 

the  SIMS  Inventory  System.  After  the  addition  of  data 
values  by  the  user,  the  deck  becomes  input  to  two  other 
programs . 
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USER  REPORTS 
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3. 1 User  Reports 


Each  user  report  is  described  in  the  following  subsections  in 
terms  of  a brief  explanation  of  the  report's  usefulness,  a report  speci- 
fication, and  a sample  report.  Each  sample  report  displays  the  name  of 
a transit  property.  The  name  displayed  is  not  contained  in  the  code  of 
the  report  generator  program.  The  user  specifies  the  name  in  the 
Job  Control  Language  when  the  system  procedures  are  developed. 
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3.1.1  Materials  Transaction  History  Reports 


The  Materials  Transaction  History  report  may  be  generated  through 
the  execution  of  either; 

(a)  Materials  Transaction  History  report  generator  program, 

RPOIOC,  or 

(b)  Requested  Materials  Transaction  History  report  generator 
program,  RPOIOD. 

These  programs  use  different  input  files  and  there  are  differences 
in  the  functions  performed. 

The  Materials  Transaction  History  report  generator  program  is 
executed  each  time  the  Inventory  Master  File  is  updated.  It  uses  the 
Current  Transaction  File  to  produce  a detailed  listing  of  the  transactions 
processed.  The  transaction  records  in  this  file  include  both  the 
original  transaction,  in  the  standard  SIMS  format,  and  part  of  the  Stock 
Status  master  file  record  after  it  has  been  affected  by  the  processing 
of  the  transaction.  The  report  generated  permits  the  user  to  monitor  the 
processing  of  the  transactions  and  the  impact  on  the  inventory  status 
record. 

The  transaction  records  displayed  are  grouped  by  item  number.  Each 
number  is  headed  by  the  item  number  and  name,  followed  by  one  line  for 
each  transaction  processed.  Within  item  number,  the  transactions  are 
sequenced  by  transaction  date  and  transaction  type.  The  extended  trans- 
action record  is  reformatted  for  the  purpose  of  printing  the  report. 

This  facilitates  the  use  and  interpretation  of  the  report  by  the  user. 

The  Requested  Materials  Transaction  History  report  generator  pro- 
gram is  executed  on  request  by  the  user.  It  uses  the  Transaction 
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History  File  to  produce  the  report.  The  user  requests  the  transaction 
history  of  up  to  20  items  by  means  of  Part  History  Select  cards  (see 
Section  4.3).  The  period  of  transaction  history  to  be  displayed  for 
each  item  can  be  limited  by  defining  it  in  the  request  card. 

The  format  of  the  report  generated  is  the  same  irrespective  of 
which  program  is  executed.  Table  3.1-1  contains  the  specification  of 
the  report.  The  report,  generated  automatically  each  time  the  Inventory 
Master  File  is  updated,  is  illustrated  in  Figure  3.1-1.  The  requested 
report  is  illustrated  in  Figure  3.1-2. 
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TABLE  3.1-1 


REPORT  SPECIFICATION 
MATERIALS  TRANSACTION  HISTORY 

GENERATING  PROGRAM: 

RPOIOC  or  RPOIOD 

FREQUENCY : Weekly  or  on-demand 

REPORT  HEADER;  MATERIALS  TRANSACTION  HISTORY 
FOR  PROCESSING  DATE  MO/DA/YR 

ORGANIZATION ; Detail  report  lines  are  organized  by: 

House  Inventory  Number 
Processing  Date 
Transaction  Date 
Transaction  Code 

The  first  line  for  each  inventory  item  consists  of 
the  House  Inventory  Number  and  House  Name. 


CONTENTS 

COLUMN  HEADER 

DESCRIPTION 

Date 

Transaction  date 

Code 

Transaction  code 

Order  Price 

Unit  price  per  purchase  order 

Quantity 

Ordered 

On-Order 

Quantity  ordered  per  purchase  order 
Total  quantity  on  order 

Rcpts. 

Quantity  received 

Quantity 

Issues 

Adjts. 

Quantity  issued 
Quantity  adjustment 

On-Hand 

Quantity  on-hand,  i.e.,  stock  balance 

Average  Price 

Average  unit  price  of  quantity  on-hand 

Document /Ac count 

Source  document  number  or  account  code 

W.O. 

Work  order  number 
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TABLE  3.1-1  (Concluded) 


COLUMN  HEADER 

DESCRIPTION 

Equip 

Equipment  (coach)  number 

Grp-Unit 

Group-unit  code 

TR 

Type  of  work  and  reason  codes 

ED 

Division  to  which  equipment  assigned 

IS 

Store  from  which  materials  issued 
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MATtRIALS  TRANSACTION  HISTORY 
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FIGURE  3.1-1 

MATERIALS  TRANSACTION  HISTORY  REPORT 
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FIGURE  3.1  2 

REQUESTED  MATERIALS  TRANSACTION  HISTORY  REPORT 


3.1.2  Reorder  Notification  Reports 


The  Reorder  Notification  and  Followup  Reorder  Notification  reports 
are  designed  to  stimulate  purchasing  actions.  These  reports  are 
generated  automatically  each  time  inventory  transactions  are  processed. 

The  Reorder  Notification  report  is  designed  to  inform  management 
of  items,  under  Inventory  control,  that  need  reordering.  This  need  is 
determined  by  comparing  the  record  of  the  quantity  on-hand  and  on-order 
with  a user-specified  reorder  point.  If  the  quantity  is  less  than  or 
equal  to  the  reorder  point,  the  item  is  a candidate  for  reporting. 

The  Followup  Reorder  Notification  is  a remainder,  generated  auto- 
matically, that  purchasing  action  has  not  been  taken.  Items  are  can- 
didates for  this  report  after  a period  of  time.  The  user  specifies,  as 
a system  constant,  a reorder  notice  interval.  If  no  Purchase  Order  trans- 
action for  the  item  is  processed  by  the  time  this  interval  elapses,  the 
item  is  a candidate  for  the  follow-up  report.  The  item  continues  to  be 
reported,  at  the  same  interval  of  time,  until  a purchase  order  trans- 
action is  processed  or  the  reorder  point  is  changed  with  the  result  that 
the  item  is  no  longer  a candidate  for  the  report. 

When  the  item  appears  on  either  report,  the  Information  displayed 
includes  a reorder  notice  (RN)  number.  On  the  Reorder  Notification 
report,  the  RN  number  is  ’01'.  The  first  appearance  of  the  item  on  the 
Followup  Reorder  Notification  report  is  noted  by  an  RN  number  02,  the 
second  appearance  by  RN  number  03,  etc.,  to  alert  the  user  to  the  period 
of  time  that  has  elapsed  since  the  need  to  reorder  was  detected. 
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The  format  of  both  reports  is  identical  and  is  described  in  Table 
3.1-2.  The  report  displays  for  each  candidate  item  the  item  number  and 
name,  unit  of  measurement,  quantities  on-hand  and  on-order,  current  average 
price,  and  the  quarterly  history  of  usage  for  five  quarters.  This  in- 
formation, is  displayed  to  assist  management  in  the  purchasing  decision. 

The  Reorder  Notification  report  is  illustrated  in  Figure  3.1-3.  The 
follow-up  report  is  illustrated  in  Figure  3.1-4. 
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TABLE  3.1-2 


REPORT  SPECIFICATION 
REORDER  NOTIFICATION  REPORTS 

GENERATING  PROGRAM: 
FREQUENCY;  Weekly 

RPOll 

REPORT  HEADER;  (FOLLOWUP)  REORDER  HOIIFICATION 
AS  OF  MO/DA/YR 

ORGANIZATION ; Detail  report  lines  are  sequenced  by  item  number 
in  ascending  order 

CONTENTS : 


COLUMN  HEADER 

DESCRIPTION 

RN  No. 

Reorder  Notice  number 

House  Number 

House  item  number 

Name 

Item  Name 

UI 

Unit  of  issue 

RP 

Reorder  point 

On-Hand 

Quantity  on-hand 

On-Order 

Quantity  on-order 

Average  Price 

Current  average  unit  price 

Issues  QTD 

Issues  to  date  during  current  quarter 

Issues  for  Quarter  Ended  Issues  during  each  of  last  four  quarters 

Last  PO  No.  Last  Purchase  Order  number 
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FIGURE  3.1  3 

REORDER  NOTIFICATION  REPORT 
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3.1.3  Division  Stock  Replacement  Report 

The  Division  Stock  Replacement  report  Is  generated  automatically 
each  time  Inventory  transactions  are  processed.  The  report  Is  designed: 

(a)  to  be  used  as  a source  document  for  the  preparation 
of  shipments  to  be  sent  to  ancillary  storerooms  to 
replace  materials  Issued  from  those  locations;  and 

(b)  to  assist  management  to: 

(1)  monitor  the  use  of  materials  at  each 
division,  and 

(2)  determine  the  quantities  of  materials  that 
should  be  kept  on-hand  at  ancillary  storerooms — 
that  Is,  nominal  division  stock  levels. 

A separate  section  of  the  report  Is  produced  for  each  storeroom. 
Each  Item  Issued  at  that  storeroom  during  the  reporting  period  Is  listed, 
together  with  Its  name,  unit  of  Issue,  the  total  quantity  Issued,  and  the 
nominal  division  stock  level.  If  the  quantity  Issued  exceeds  the  nominal 
stock  level,  the  quantity  Is  asterisked  to  draw  the  attention  of  manage- 
ment to  the  Item. 

Table  3.1-3  contains  the  report  specifications.  The  report  Is 
Illustrated  In  Figure  3.1-5. 
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TABLE  3.1-3 


REPORT  SPECIFICATION 
DIVISION  STOCK  REPLACEMENT 

GENERATING  PROGRAM;  RP016 
FREQUENCY;  Weekly 

REPORT  HEADER;  DIVISION  STOCK  REPLACEMENT 
DIVISION  XX  AS  OF  MO/DA/YR 

ORGANIZATION ; There  Is  a separate  report  section  for  each 
division.  Within  the  report  section,  detail 
lines  are  organized  by  item  number  in  ascending 


order. 

CONTENTS; 

COLUMN  HEADER 

DESCRIPTIQN 

House  Number 

House  item  number 

Name 

Item  name 

UI 

Unit  of  issue 

Stock  Level 

Nominal  division  stock  level 

Quantity  Issued 

Total  quantity  issued  per  issue 
transactions  and  return  to  stores 
transactions  processed. 
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AC  TRANSIT 

DIVISION  STOCK  REPLACEMENT 
DIVISION  04  AS  OF  05/24/74 
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FIGURE  3.1-5 

DIVISION  STOCK  REPLACEMENT  REPORT 


3.1.4  Unfilled  Purchase  Orders  Report 

In  the  SIMS  Inventory  System,  an  order  placed  for  an  individual 
materials  item  is  treated  as  a separate  Purchase  Order.  When  the 
material  is  received,  it  is  recorded  against  that  specific  Purchase  Order. 
Unless  the  quantity  received  equals  the  quantity  ordered,  it  is  treated 
as  an  open  or  unfilled  Purchase  Order. 

The  Unfilled  Purchase  Orders  Report  is  an  on-demand  report,  normally 
requested  monthly.  It  is  designed  to  permit  the  user  to  monitor  the 
status  of  each  open  Purchase  Order.  Items  appear  on  the  report  after 
an  Interval,  specified  by  the  user  as  a system  constant,  has  elapsed. 

This  interval  is  the  normal  time  lag  between  placing  the  order  with  the 
vendor  and  the  receipt  of  the  materials  ordered.  Thus,  the  report  in- 
cluoes  only  those  items  overdue,  in  terms  of  the  normal  time  lag. 

The  Purchase  Order  records  displayed  are  sequenced  by  house  inven- 
tory number.  They  Include  the  details  of  the  Purchase  Order  and  the 
quantity  on  back  order.  If  an  overshipment  has  been  received,  the  Pur- 
chase Order  is  still  treated  as  an  open  order.  The  overshipment  appears 
as  a negative  back  order.  User  action  is  required  to  close  the  order. 

Table  3.1-4  contains  the  report  specifications.  The  report  is 
Illustrated  in  Figure  3.1-6. 
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TABLE  3.1-4 


REPORT  SPECIFICATION 
UNFILLED  PURCHASE  ORDERS  REPORT 


GENERATING  PROGRAM;  RP013 

FREQUENCY;  Monthly 

REPORT  HEADER;  UNFILLED  PURCHASE  ORDERS  REPORT 

AS  OF  MO/DA/YR 

ORGANIZATION;  Detail  report  lines  are  sequenced  by  house  item 
number  in  ascending  order.  If  there  is  more 
than  one  unfilled  Purchase  Order  for  the  same 
item,  the  appearance  of  those  lines  is  in  random 
order  within  the  item. 


CONTENTS; 
COLUMN  HEADER 
Vendor  Code 
House  Number 
Name 
UI 


DESCRIPTION 

Code  number  representing  a vendor 
House  item  number 
Item  name 
Unit  of  issue 


Quantity 

Ordered 


Back  Ordered 


Quantity  ordered  per  Purchase  Order, 
Including  any  changes  to  the  original 
quantity  ordered 

Quantity  ordered  but  not  received 


Date 

Ordered 

Expected 


Date  of  Purchase  Order 
Estimated  date  of  delivery 


PO  Number 


Purchase  Order  number 
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AC  TRANSIT 

UNFILLED  PURCHASE  ORDERS  REPORT 
AS  OF  01/31/73 
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FIGURE  3.1-6 

UNFILLED  PURCHASE  ORDERS  REPORT 


3.1.5  Outstanding  Purchase  Orders  Report 


The  Outstanding  Purchase  Orders  Report  Is  an  on-demand  report, 
normally  requested  monthly.  This  report  Is  a modification  of  the  Un- 
filled Purchase  Orders  Report.  It  Is  designed  to  present  the  status 
of  open  purchase  orders  by  vendor. 

A separate  report  section  Is  generated  for  each  vendor  with  whom 
there  Is  an  open  order.  Each  report  section  displays  the  open  orders 
sequenced  by  Purchase  Order  number  and  then  by  house  Inventory  number. 
Purchase  Order  values  are  displayed — by  Item  number.  Purchase  Order 
nvunber,  and  In  total  for  the  vendor. 

In  addition  to  permitting  the  user  to  monitor  the  status  of  open 
orders,  the  report  Is  designed  to  be  used  as  a tracer  report.  Space 
Is  provided  to  enter  the  vendor's  Item  numbers.  With  this  addition, 
the  report  could  be  forwarded  to  the  vendor  to  advise  him  of  the  out- 
standing Items.  Space  Is  also  provided  for  a vendor  response  for  each 
line  Item. 

Table  3.1-5  contains  the  report  specifications.  The  report  Is 
Illustrated  In  Figure  3.1-7. 
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TABLE  3.1-5 


REPORT  SPECIFICATION 
OUTSTANDING  PURCHASE  ORDERS  REPORT 


GENEPATING  PROGRAM:  RP022 

FREQUENCY:  Monthly 

REPORT  HEADER: 

To:  (Vendor  Code) 

(Vendor  Name) 

OUTSTANDING  PURCHASE  ORDERS 
THESE  ITEMS  HAVE  BEEN  OUTSTANDING 
FOR  AT  LEAST  30  DAYS  AS  OF  MO/DA/YR 

ORGANIZATION t The  report  contains  a separate  section  for  each 

vendor  with  whom  there  is  at  least  one  outstanding 
purchase  order  30  days  or  older  as  of  the  report 
date.  Detail  lines  within  each  report  section 
are  sequenced  in  ascending  order  by: 


CONTENTS: 

Purchase  Order  number 
House  inventory  number 

COLUMN  HEADER 

DESCRIPTION 

Purchase  Order 

Purchase  Order  number  and  date 

House  Item  No. 

House  inventory  number 

Vendor  Item  No. 

This  column  is  blank,  and  may  be 
completed  by  the  user 

Name 

Item  Name 

Quantity 

Ordered 

Outstanding 

Purchase  Order  quantity 

Purchase  Order  quantity  less  quantity 

received 

Unit  Price 

Purchase  Order  price 

Ul 

Unit  of  issue 

Outstanding  Amount 

Value  of  outstanding  quantity,  at  Pur- 
chase Order  price 

Vendor  Response 

This  column  is  blank,  and  may  be  com- 
pleted by  the  vendor 
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FIGURE  3.1  7 

OUTSTANDING  PURCHASE  ORDERS  REPORT 


3.1.6  Vendor  Performance  Report 

The  Vendor  Performance  Report  is  an  on-demand  report,  normally 
requested  monthly.  It  is  designed  to  permit  the  user  to  review  period- 
ically the  responsiveness  of  each  vendor  to  the  needs  of  the  system 
user  and  the  volume  of  business  placed  with  the  vendor  over  a 12-month 
period. 

Two  categories  of  information  with  respect  to  each  vendor  are  dis- 
played. The  momber  and  dollar  value  of  purchase  orders  written  during 
the  report  month  and  during  the  preceding  12  months  are  displayed.  This 
permits  the  user  to  review  the  absolute  volume  of  business  placed  with 
the  vendor  and  the  current  demands  made  on  the  vendor.  The  value  of 
unfilled  purchase  orders,  aged  and  in  total,  are  displayed  to  permit 
the  user  to  review  the  responsiveness  of  the  vendor  to  the  property’s 
needs  in  the  context  of  the  total  volume  of  business. 

Table  3.1-6  contains  the  report  specifications.  The  report  is 
illustrated  in  Figure  3.1-8. 
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TABLE  3.1-6 


REPORT  SPECIFICATION 
VENDOR  PERFORMANCE  REPORT 


GENERATING  PROGRAM:  RP014 

FREQUENCY;  Monthly 

REPORT  HEADER;  VENDOR  PERFORMANCE  REPORT 
MONTH  ENDING  MO/DA/YR 

ORGAN I Z AT ION ; Detail  report  lines  are  sequenced  by  vendor  code 
in  ascending  order.  The  vendor  code  and  vendor 
name  are  displayed  on  the  line  above  the  data 
values.  A line  is  skipped  after  each  line  of 
data  values.  Totals  of  all  data  values  are  shown 
on  the  last  line. 

CONTENTS; 

COLUMN  HEADER  DESCRIPTION 


Purchase  Orders  Written 
Last  12  Months 
No. 

Value 

This  Month 
No. 

Value 


Number  of  Purchase  Orders  written  in 
the  12  months  prior  to  report  month 

Value  of  Purchase  Orders  written  in 
the  12  months  prior  to  report  month 

Number  of  Purchase  Orders  written  in 
repert  month 

Value  of  Purchase  Orders  written  in 
report  month 


Unfilled  Purchase  Orders  Value 
All 

31-60  Days 
Over  60  Days 


Value  of  all  items  ordered  but  not 
received 

Value  of  all  items  ordered  31-60  days 
ago  but  not  received 
Value  of  all  items  ordered  more  than 
60  days  ago  but  not  received 
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VENDOR  PERFORMANCE  REPORT  PAGE  2 

MONTH  ENDING  01/10/74  02/21/74 
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FIGURE  3.1-8 

VENDOR  PERFORMANCE  REPORT 


3.1.7  Stock  Status  Report 


The  Stock  Status  Report  is  an  on-demand  report,  normally  requested 
monthly.  The  request  may  be  made  with  respect  to: 

(a)  one  inventory  class, 

(b)  a range  of  inventory  classes,  or 

(c)  all  inventory  classes. 

The  report  is  designed  to  display  detailed  information  about  the 
status  of  inventory  items  and  to  provide  a summary  of  the  use  history 
of  materials  during  the  past  12-15  months. 

The  information  displayed  is  sequenced  by  house  inventory  number. 
It  includes: 

(a)  the  reorder  point, 

(b)  quantity  on-hand, 

(c)  quantity  on-order, 

(d)  average  unit  price,  and 

(e)  quantities  issued,  by  calendar  quarters. 

The  report  provides  the  user  with  the  means  for  a review  of  the 
inventory  status.  This  review  can  include: 

(a)  adequancy  of  existing  stock  levels  to  meet  demand, 

(b)  evaluation  of  reorder  points, 

(c)  analysis  of  use  history,  and 

(d)  analysis  of  the  investment  in  inventory. 

Table  3.1-7  contains  the  report  specifications.  The  report  is 
illustrated  in  Figure  3.1-9. 
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TABLE  3.1-7 


REPORT  SPECIFICATION 
STOCK  STATUS  REPORT 

GENERATING  PROGRAM;  RP0I7 

FREQUENCY;  Monthly 

REPORT  HEADER;  STOCK  STATUS  REPORT 
AS  OF  MO/DA/YR 

ORGANIZATION ; Report  detail  lines  are  sequenced  by  house 
inventory  number  in  ascending  order 


CONTENTS ; 

COLUMN  HEADER 

DESCRIPTION 

House  Number 

House  inventory  number 

Name 

Item  name 

UI 

Unit  of  issue 

RP 

Reorder  point 

Quantity 

On-Hand 

On-Order 

Quantity  of  the  item  on-hand 
Quantity  of  the  item  on-order 

Average  Price 

Average  unit  price  of  the  item 

Issues  QTD 

Quantity  of  the  item  issued  during 
current  quarter 

Issues  for  Quarter  Ended 

Quantities  of  the  item  issued  during 
each  of  the  four  prior  quarters  indicated 

DIV 
03  1 
OA  1 

Nominal  stock  levels  at  ancillary  store- 
rooms 03  and  04  if  on  file 
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FIGURE  3.1  9 
STOCK  STATUS  REPORT 


3.1.8  Inventory  Activity  Reports 


Two  financial  reports  are  produced  by  one  report  generator  program. 
This  program  is  the  Inventory  Activity  Report  Generator  program,  RP020, 
described  in  Section  7.13.  The  reports  produced  are  on-demand  reports, 
normally  requested  monthly.  They  are: 

(a)  Inventory  Activity  Report;  and 

(b)  Inventory  Activity  Abstract. 

The  Inventory  Activity  Report  is  designed  for  use  by  the  Controller 
and  by  the  manager  responsible  for  the  inventory.  For  the  former,  the 
report  may  serve  as  an  accounting  source  docioment. 

The  Inventory  Activity  Report  provides  information  for  each  in- 
ventory class,  including  free  stores  classes  and  direct  charge  items. 

The  information  provided  is  summary  information  of  the  values  of  in- 
ventory transactions  during  the  report  month  and  of  the  investment  in 
inventory  at  the  beginning  and  end  of  the  month.  The  report  also  dis- 
plays inventory  activity  indicators  in  the  form  of: 

(a)  percentage  of  change  in  investment;  and 

(b)  inventory/issue  ratios  for  the  report  month, 
prior  month,  and  last  three  months. 

The  latter  provides  a means  of  monitoring  trends  in  inventory  turnover 
by  class. 

In  addition  to  the  information  displayed  for  each  class  of  inven- 
tory, total  dollar  values,  and  average  values  of  the  inventory  activity 
indicators  are  displayed. 
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The  Inventory  Activity  Abstract  is  designed  for  use  by  top  manage- 
ment. It  displays  trend  data  of  the  total  investment  in  inventory  and 
of  the  use  of  materials.  Information  is  displayed  for  the  report  month 
and  each  of  the  preceding  12  months.  For  each  month  and  as  12-month 
and  13-month  averages,  the  following  is  displayed: 

(a)  investment  in  inventory  at  the  end  of  the  month, 

(b)  average  investment  per  bus, 

(c)  values  of  materials  used, 

(d)  average  materials  value  per  bus,  and 

(e)  inventory /issues  ratio. 

Tables  3.1-8  and  3.1-9  contain  the  specifications  of  the  reports. 
They  are  illustrated  in  Figures  3.1-10  and  3.1-11. 
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TABLE  3.1-8 


REPORT  SPECIFICATION 
INVENTORY  ACTIVITY  REPORT 

GENERATING  PROGRAM: 
FREQUENCY:  Monthly 

RP020 

REPORT  HEADER;  INVENTORY  ACTIVITY  REPORT 
FOR  MONTH  OF  MO/YR 

ORGAN I ZAT ION ; Detail  report  lines  are  sequenced  by  inventory 

class  code  in  ascending  order.  Totals  of  dollar 
values  and  weighted  averages  of  percent  changes 
and  ratios  are  shown  on  the  last  line. 


CONTENTS : 

COLUMN  HEADER 

DESCRIPTION 

Inv  Class 

Inventory  class  code 

Beginning  Balance 

Value  of  all  items  in  the  class  at 
the  beginning  of  report  month 

Receipts 

Value  of  receipts  of  all  items  in  the 
class  during  the  report  month 

Issues 

Value  of  issues  of  all  items  in  the 
class  during  the  report  month 

Adjustments 

Value  of  adjustments  for  all  items  in 
the  class  during  the  report  month 

Ending  Balance 

Value  of  all  items  in  the  class  at  the 
end  of  the  report  month. 

Change 

Difference  between  the  beginning  balance 
and  the  ending  balance 

Percent  Change 

Change/Beginning  Balance  X 100 

Inventory-Issues  Ratio 


This  Period 
Last  Period 
Last  3 Periods 

Beginning  Balance/Issues 
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TABLE  3.1-9 


REPORT  SPECIFICATION 
INVENTORY  ACTIVITY  ABSTRACT 


GENERATING  PROGRAM;  RP020 

FREQUENCY;  Monthly 

REPORT  HEADER:  INVENTORY  ACTIVITY  ABSTRACT 

FOR  MONTH  OF  MO/YR 

ORGANIZATION : Each  report  line  contains  activity  data 

associated  with  a specified  month.  The 
detail  report  lines  are  sequenced  by  month, 
from  the  earliest  in  the  report  period. 
Thirteen-month  and  twelve-month  averages 
are  shown  on  the  last  two  lines. 


CONTENTS : 

COLUMN  HEADER 

DESCRIPTION 

Month 

One  of  the  thirteen  months  covered 
by  the  report 

Ending  Balance 

Value  of  all  inventory  items  at  the 
end  of  the  month 

Avge  Per  Bus 

Ending  Balance/Number  of  Buses  (system 
constant) 

Monthly  Issues 

Value  of  all  issues  of  materials  during 
the  month 

Avge  Per  Bus 

Monthly  Issues/Number  of  Buses  (system 
constant) 

Inventory-Issues  Ratio 


Beginning  balance  of  inventory  value 
divided  by  value  of  monthly  issues 


INVENTORY-ISSUES  RATIO 

INV  BEGINNING  ENDING  PERCENT  THIS  LAST  LASTS 

CLASS  BALANCE  RECEIPTS  ISSUES  ADJSTHNTS  BALANCE  CHANGE  CHANGE  PERIOD  PERIOD  PERIODS 
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FIGURE  3111 

INVENTORY  ACTIVITY  ABSTRACT 


3.1.9  Low  Usage  Materials  Items  Report 

The  Low  Usage  Materials  Items  report  is  on-demand  report.  The 
report  requested  may  contain  information  with  respect  to: 

(a)  one  inventory  class; 

(b)  a range  of  classes,  or 

(c)  all  classes. 

The  report  is  designed  to  permit  the  user  to  identify  inactive 
materials  items  and  to  provide  detailed  Information  about  those  items. 
The  report  includes  those  items  that  have  not  been  issued  for  a speci- 
fied period  of  time.  This  time  interval  is  specified  by  the  user  as  a 
system  constant.  However,  the  system  constant  can  be  overriden  by 
specifying  another  value  for  the  low  usage  Interval  in  the  report 
•Request. 

The  report  contains  the  following  detailed  information: 

(a)  quantity  on-hand, 

(b)  average  unit  price, 

(c)  value  of  the  quantity  on-hand, 

(d)  quantity  last  issued,  and 

(e)  date  of  the  last  issue. 

For  each  class,  a total  line  is  printed  showing  the  on-hand  value 
of  the  class. 

Table  3.1-10  contains  the  report  specifications.  The  report  is 
Illustrated  in  Figure  3.1-12. 
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TABLE  3.1-10 


REPORT  SPECIFICATION 
LOW  USAGE  MATERIALS  ITEMS  REPORT 

GENERATING  PROGRAM; 

RP018 

FREQUENCY ; On-demand 

REPORT  HEADER;  LOW  USAGE  MATERIALS  ITEMS 
AS  OF  MO/DA/YR 

ORGANIZATION ; Detail  report  lines  are  sequenced  by  house 
Inventory  number  in  ascending  order.  The 
total  value  of  each  inventory  class  is  shown 
OH  the  line  after  the  last  item  in  the  class. 
The  report  includes  only  items  that  have  not 
been  Issued  for  a number  of  days  specified  by 
the  user  (low  usage  interval) . 


CONTENTS: 

COLUMN  HEADER 

DESCRIPTION 

House  Number 

House  inventory  number 

Name 

Item  name 

UI 

Unit  of  issue 

Quantity  On-Hand 

Quantity  of  the  item  on-hand 

Average  Unit  Price 

Average  unit  price  of  the  item 

On-Hsind  Value 

Value  of  the  quantity  on-hand,  at 
average  unit  price 

Last  Issue 

Date  of  last  issue 

Last  Issue  Quantity  Quantity  last  issued 
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FIGURE  3.1-12 

LOW  USAGE  MATERIALS  ITEMS  REPORT 


3.1. 10  Inventory  of  Dlvlalon  Stock  Report 


The  Inventory  of  Division  Stock  report  is  designed  for  use  when 
a physical  inventory  is  performed.  Stock  at  ancillary  storerooms  is 
counted  and  the  count  data  converted  to  machine-readable  form.  The 
information  is  processed  through  the  execution  of  the  Division  Stock 
Reconciliation  program,  INVDIV,  described  in  Section  7.23.  One  func- 
tion of  the  program  is  the  comparison  of  the  quantity  on-hand  of  each 
item  at  each  division  with  the  nominal  stock  level  on  file.  The  In- 
ventory of  Division  Stock  report  displays  the  results  of  this  comparison. 
Based  on  the  reported  data,  the  user  may: 

(a)  decide  to  recount  part  of  the  division  stocks,  or 

(b)  use  the  report  to  prepare  stock  transfers  to 
replenish  division  stock  levels. 

The  overall  purpose  of  the  report  is  to  display  to  the  ixser  a compari- 
son of  actual  stock  levels  and  nominal  stock  levels  of  Items  stored 
in  ancillary  storerooms  as  a basis  for  management  decision-making. 

Table  3.1-11  contains  the  report  specifications.  The  report  is 
illustrated  in  Figure  3.1-13. 
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TABLE  3.1-11 


REPORT  SPECIFICATION 
INVENTORY  OF  DIVISION  STOCK  REPORT 


GENERATING  PROGRAM;  INVDIV 
FREQUENCY ; On- demand 

REPORT  HEADER;  INVENTORY  OF  DIVISION  STOCK 
DIVISION  (99) 

ORGANIZATION ; The  report  contains  a line  for  each  Inventory 
item  stocked  at  the  division  and  for  which 


a transaction  is  input  to  the  program.  Report 
detail  lines  are  sequenced  by  house  inventory 
number  in  ascending  order. 


CONTENTS: 


COLUMN  HEADER 


DESCRIPTION 


House  Number 


House  inventory  number 


Item  Name 


Item  name 


Unit 


Unit  of  issue 


Division  Stock  Level 


Nominal  stock  level  at  ancillary 
storeroom 


Quantity  On-Hand 


Quantity  on-hand  at  ancillary  storeroom 


Adj ustment 


Difference  between  Division  Stock  Level 
and  Quantity  On-Hand 
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FIGURE  3.M3 

INVENTORY  OF  DIVISION  STOCK  REPORT 


3.1.11  Receiving  Report 

V/henever  Purchase  Order  transactions  are  processed  during  execution 
of  the  basic  weekly  system  run,  these  transactions  are  used  In  a later 
job  step  to  generate  receiving  reports.  Purchase  Order  transactions 
are  recombined  to  emulate  the  Purchase  Order  sent  to  the  vendor.  A 
separate  Receiving  Report  Is  generated  for  each  Purchase  Order  processed 
during  the  run. 

The  purposes  of  this  report  are  threefold;  It  serves  as; 

(a)  a report  to  monitor  the  processing  of  Purchase 
Order  transactions; 

(b)  a source  document  that  can  be  used  to  record 
materials  receipts;  and 

(c)  a source  document  that  can  be  used  by  a key- 
punch operator  to  convert  receipt  trans- 
actions to  machine-readable  form.  For  this 
purpose,  the  receipt  transaction  fields  are 
numbered  In  parentheses  as  a guide  to  the 
keypxinch  operator. 

A receiving  report  generated  may  emulate  an  original  Purchase  Order 
or  It  may  contain  changes  to  a Purchase  Order  previously  processed. 

The  report  generated  In  the  latter  Instance  Is  an  Amendment  to  the  Receiving 
Report.  It  displays  changes  In  the  quantities  ordered  or  revised 
prices . 

Table  3.1-12  contains  the  report  specifications.  Figure  3.1-14 
Illustrates  a Receiving  Report.  Figure  3.1-15  Illustrates  an  Amendment 
to  Receiving  Report. 
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TABLE  3.1-12 


REPORT  SPECIFICATION 
RECEIVING  REPORT 

GENERATING  PROGRAM;  RP060 
FREQUENCY;  Weekly 


REPORT  HEADER:  (AMENDMENT  TO) 

RECEIVING  REPORT 

(Vendor  Name) 
(Vendor  Code) 

PO  NO  XXXXXX 
PO  DATE  MO/DA/YR 

ORGANIZATION : The  report  lines  are  associated  with  individual 

Inventory  items  ordered  on  the  same  Purchase 
Order.  A separate  page  is  generated  for 
each  Purchase  Order  number. 

CONTENTS: 


COLUMN  HEADER 

DESCRIPTION 

Account  Number 

General  ledger  accotmt  number  for 
free  stores.  a»d  direct  charge  items 

House  Number 

House  Inventory  number 

UI 

Unit  of  issue 

Quantity  Ordered 

Quantity  ordered 

Item 

Item  name 

Price 

Purchase  Order  price 

Value 

Value  of  the  quantity  ordered,  at 
Purchase  Order  price 

Quantity  Received 

This  column  is  blank.  It  is  used  to 
record  the  receipt  of  the  material. 

Date  Received 

This  column  is  blank.  It  Issued  to 
record  the  date  of  the  materials 
receipt. 
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FIGURE  3.114 
RECEIVING  REPORT 


AC  TRANSIT  05/23/TA 

AHENONENT  TO  RECEIVING  REPORT 
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FIGURE  3.1t5 

AMENDMENT  TO  RECEIVING  REPORT 


3.2  Edit  Reports 


Edit  reports  are  produced  by  the  system  to  enable  the  user  to  monitor 
system  input  and  to  correct  input  that  has  failed  acceptance  criteria. 
These  reports  are  listed  in  Table  3.2-0.  Each  report  is  described  in 
the  following  subsections  in  terms  of  its  purpose,  a report  specification, 
and  a sample  report. 
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2.14  On-Demand  Vendor  File  Edit  List  VENDOl 


3.2.1  Invalid  Item  Number  List 


Implementation  of  the  SIMS  Inventory  System  at  ACTD  required  the  use 
of  a User  Input  Processor  program,  DA200,  described  in  Section  7.1. 

When  an  Item  Characteristics  record  is  processed  by  this  program,  the 
house  inventory  number  is  checked  to  determine  if  it  contains  a valid 
item  number.  If  the  item  number  is  invalid,  the  input  record  is  not 
processed  and  its  contents  displayed  on  the  Invalid  Item  Numbers  list. 
Table  3.2-1  contains  the  specifications  of  this  edit  report,  which  is 
illustrated  in  Figure  3.2-1. 


3-48 


TABLE  3.2-1 


REPORT  SPECIFICATION 
INVALID  ITEM  NUMBERS  LIST 


GENERATING  PROGRAM;  DA200 
FREQUENCY;  Weekly 

REPORT  HEADER;  INVALID  ITEM  NUMBERS 
FOR  MO/DA/YR 

ORGANIZATION ; Report  lines  are  ordered  in  the  sequence  in 
which  the  transaction  records  were  read  by 
DA200. 

CONTENTS ; One  line  is  printed  for  each  invalid  item  number. 

This  line  consists  of  a listing  of  an  Item  Charac- 
teristics Record. 
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FIGURE  3.2-1 
INVALID  ITEM  NUMBERS 


3.2.2  Invalid  Transactions  List 


The  SIMS  Inventory  System  Is  designed  to  accept  and  process  a 
prescribed  set  of  transactions,  each  of  which  has  an  associated  trans- 
LCtdion  code.  During  execution  of  the  Data  Acceptance  program,  DA300, 
the  transaction  code  contained  In  each  Input  record  Is  checked.  If  the 
transaction  code  1s  Invalid,  the  transaction  Is  not  processed  and  Its 
contents  are  displayed  on  the  Invalid  Transactions  list.  A report  speci- 
fication Is  contained  In  Table  3.2-2  and  the  edit  list  Is  Illustrated 
In  Figure  3.2-2. 


3-51 


TABLE  3.2-2 


REPORT  SPECIFICATION 
INVALID  TRANSACTIONS  LIST 


GENERATING  PROGRAM;  DA300 
FREQUENCY;  Weekly 

REPORT  HEADER;  INVALID  TRANSACTIONS 
FOR  MO/DA/YR 

ORGANIZATION ; Report  lines  are  printed  in  the  order  in 
which  the  transactions  are  submitted. 

CONTENTS;  One  report  line  is  printed  for  each  trans- 
action rejected.  This  line  contains  a listing 
of  the  transaction. 
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FIGURE  3,2  2 
INVALID  TRANSACTIONS 


3.2.3  Constants  File  Edit  List 


If  a System  Constants  Record  is  input  to  the  system,  it  is  processed 
during  execution  of  the  Data  Acceptance  program,  DA300.  The  results 
of  processing  are  displayed  on  the  Constants  File  Edit  list.  This  list 
has  the  following  uses: 

(a)  if  the  input  record  is  valid,  the  Inventory  Constants  File 
is  updated.  The  file  record,  before  and  after  updating,  is 
displayed  on  the  edit  list.  This  enables  the  user  to  verify 
that  the  file  was  updated  correctly;  and 

(b)  if  the  input  record  was  unacceptable,  the  contents  of 
the  input  record  are  displayed,  with  an  asterisk  printed 
under  the  low  order  byte  position  of  the  field  or  fields 
in  error.  This  alerts  the  user  to  the  rejection  of  the 
input  record  by  the  system. 

Table  3.2-3  contains  the  report  specifications.  The  report  is  il- 
lustrated in  Figure  3.2-3. 
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TABLE  3.2-3 


REPORT  SPECIFICATION 
CONSTANTS  FILE  EDIT  LIST 


GENERATING  PROGRAM:  DA300 


FREQUENCY:  Weekly 


REPORT  HEADER:  CONSTANTS  FILE  EDIT 

FOR  MO/DA/YR 


ORGAN I Z AT ION : There  is  normally  only  one  constants  record 

input  to  the  system  at  one  time.  There  are 
two  report  lines  consisting  of  either: 

(a)  the  Inventory  Constants  File  record, 
before  and  after  updating,  or 

(b)  the  rejected  input  record,  followed 

by  a line  for  the  asterisk  or  asterisks 
indicating  the  field  or  fields  in  error. 

CONTENTS : 


COLUMN  HEADER 


DESCRIPTION 


Transaction  Either  the  Constants  File  record  or 

the  input  record 

Comment  Not  used 


3-55 


CUNbTANT  FILt  FA0^2574  2 lUO I 1 05500 75003 00000 1 7 1 5 


3-56 


FIGURE  3.2  3 
CONSTANTS  FILE  EDIT 


3.2.4  Vendor  Reference  File  Update  and  Rejections  List 


If  a Vendor  Name  Record  Is  input  to  the  system,  it  is  processed 
during  execution  of  the  Data  Acceptance  program,  DA300.  The  results  of 
processing  are  displayed  on  the  Vendor  Reference  File  Update  and  Re- 
jections List.  Each  transaction,  accepted  or  rejected,  and  a message 
indicative  of  either  the  updating  action  performed  or  the  nature  of  the 
input  error  is  displayed. 

There  are  two  messages.  Indicative  that  updating  was  performed, 

i.e. : 

(a)  if  the  transaction  code  is  'CA',  the  message  is: 

(1)  Vendor  Record  Created,  or 

(2)  Vendor  Record  Updated; 

(b)  if  the  transaction  code  is  'CX',  the  message  is: 

Vendor  Record  Deleted. 

Error  messages  are: 

(a)  Vendor  Code  Not  Numeric;  this  message  may  be  displayed 
irrespective  of  the  transaction  code; 

(b)  Vendor  Name  Missing;  this  message  is  displayed  if  the 
information  is  omitted  from  a record  to  create  or  update 
the  file  record;  or 

(c)  Vendor  Code  Not  on  File;  this  message  is  displayed  if  the 
user  is  attempting  to  delete  a record  not  on  file. 

Table  3.2-4  contains  the  report  specifications.  The  report  is 
illustrated  in  Figure  3.2-4. 
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TABLE  3.2-4 


REPORT  SPECIFICATION 
VENDOR  REFERENCE  FILE  UPDATE 
AND  REJECTIONS  LIST 


GENERATING  PROGRAM;  DAS 00 
FREQUENCY;  Weekly 

REPORT  HEADER;  VENDOR  REFERENCE  FILE  UPDATE  AND  REJECTIONS 

FOR  PROCESSING  DATE  MO/DA/YR 

ORGAN I Z AT ION ; Report  lines  are  sequenced  in  the  order  in 

which  Vendor  Name  records  are  input  to  DA300. 

CONTENTS ; 

COLUMN  HEADER  DESCRIPTION 


There  are  two  report  lines  for  each  input  record.  The 
first  line  always  contains  'Update/Create  Vendor'  and  the  contents 
of  the  transaction  record.  The  second  line  contains  a message 
indicative  of  either  the  processing  performed  or  the  type  of  error 
in  the  input  record  (see  text) . 
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FIGURE  3.2  4 

VENDOR  REFERENCE  FILE  UPDATE  AND  REJECTIONS 


3.2.5  Inventory  Transaction  Edit  List 


The  transactions  input  to  the  Inventory  System  are  required  to 
meet  certain  data  acceptance  criteria.  These  criteria  are  in  the  form  of 
edit  criteria,  checking  field  contents,  or  update  criteria,  checking 
the  data  or  the  results  of  processing  the  data  against  existing  data. 
These  criteria  are  described  in  Section  7.3,  DG300  - Inventory  Master 
File  Edlt/Update.  A transaction  that  fails  to  meet  these  criteria  is 
not  processed.  It  is; 

(a)  rejected  and  its  contents  are  displayed  on  the  Inventory 
Transaction  Edit  List;  or 

(b)  stored  in  the  Suspense  File  and  its  contents  displayed 
on  the  Inventory  Suspense  File  list  (see  Section  3.2.6). 

Table  3.2-5  contains  the  specifications  of  the  Inventory  Transaction 
Edit  List,  which  is  illustrated  in  Figure  3.2-5. 
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TABLE  3.2-5 


REPORT  SPECIFICATION 
INVENTORY  TRANSACTION  EDIT  LIST 

GENERATING  PROGRAM: 
FREQUENCY:  Weekly 

DG300 

REPORT  HEADER;  INVENTORY  TRANSACTION  EDIT  LIST 

FOR  MO/DA/YR 

ORGANIZATION;  Report  detail  lines  are  sequenced  in 
ascending  order  by: 

House  inventory  number 


CONTENTS : 

Transaction  date 
Transaction  code 

COLUMN  HEADER 

DESCRIPTION 

There  are  two  report  lines  for  each  rejected  transaction. 
The  first  line  contains  transaction  information.  The  second 
line  contains  an  asterisk  under  the  low  order  byte  position 
of  each  field  in  error.  Contents  of  the  first  line  are: 


Name 

Type  of  transaction 

Message  indicating  processing  performed 


Transaction 

Contents  of  transaction  record 

Reason 

Reason  for  appearance  on  edit  list 
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3.2.6  Inventory  Suspense  File  List 


The  transactions  input  to  the  Inventory  System  are  required  to 
meet  certain  data  acceptance  criteria.  A transaction  that  fails  to  meet 
these  criteria  is  not  processed.  In  most  cases,  the  transaction  must  be 
corrected  and  resubmitted  for  processing.  Under  certain  circumstances, 
the  transaction  is  stored  in  the  Suspense  File  and  need  not  be  resubmitted. 
The  transaction  is  not  in  error,  but  because  another  transaction  has  not 
been  input,  cannot  be  processed.  Such  transactions  are  displayed  on  the 
Inventory  Suspense  File  list.  Table  3.2-6  contains  the  report  specifi- 
cations. A sample  report  is  provided  in  Figure  3.2-6. 


3-63 


TABLE  3.2-6 


REPORT  SPECIFICATION 

INVENTORY  SUSPENSE  FILE  LIST 

GENERATING  PROGRAM: 
FREQUENCY:  Weekly 

DG300 

REPORT  HEADER;  INVENTORY  SUSPENSE  FILE  CONTENTS 

FOR  MO/DA/YR 

ORGANIZATION;  Report  lines  are  sequenced  in  ascending 
order  by: 

House  inventory  number 


CONTENTS : 

Transaction  date 
Transaction  code 

COLUMN  HEADER: 

DESCRIPTION 

Transaction 

Contents  of  transaction  record 

Notice  Number 

The  number  of  times  the  transaction 
has  been  displayed  on  the  report 
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3.2.7  Purged  Items  and  Open  Purchase  Orders  List 


The  Purged  Items  and  Open  Purchase  Order  List  is  designed  to 
display: 

(a)  all  the  Inventory  Master  File  records  for  an  item  deleted 
from  the  file  by  user  action.  This  action  consists  of  the 
entry  of  an  Item  Characteristics  Record  containing  trans- 
action code  AX;  and 

(b)  an  open  Purchase  Order  purged  from  the  Inventory  Master 
File.  The  Purchase  Order  record  may  be  purged  through: 

(1)  entry  of  a transaction  to  delete  the  record,  or 

(2)  an  automatic  procedure. 

The  report  specification  is  contained  in  Table  3.2-7.  The  report 
is  illustrated  in  Figure  3.2-7. 
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TABLE  3.2-7 


REPORT  SPECIFICATION 
PURGED  ITEMS  AND  OPEN 
PURCHASE  ORDERS  LIST 

GENERATING  PROGRAM;  DG300 
FREQUENCY;  Weekly 


REPORT  HEADER: 

PURGED  ITEMS  AND  OPEN  PURCHASE  ORDERS 
FOR  MO/DA/YR 

ORGANIZATION ; There  are  a number  of  report  lines  for  each  item 


on  purchase  under  record  purged.  The  information 
is  displayed  in  ascending  order,  as  it  applies, 
by: 

House  inventory  number 
File  record  type 
File  record  date 

CONTENTS: 

There  are  no  columnar  headings.  If  an  item  is  purged,  all 
Inventory  Master  file  records  are  displayed  in  the  format  Illustrated 
in  Figure  3.2-7.  If  an  open  Purchase  Order  record  is  purged,  only 
that  record  is  displayed. 
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FIGURE  3.2  7 

PURGED  ITEMS  AND  OPEN  PURCHASE  ORDERS 


3.2.8  Part  Select  Card  Edit  Errors  List 


The  user  may  obtain  a listing  of  the  transaction  history  of  a limited 
number  of  inventory  items  through  execution  of  the  Requested  Materials 
Transaction  History  Report  Generator  program,  RPOIOD.  The  inventory 
items  for  which  the  listing  is  to  be  generated  are  specified  to  the  system 
through  the  entry  of  Part  Select  cards.  These-cards  are  edited  and,  if 
an  error  is  discovered,  the  contents  of  the  input  record  are  displayed 
on  the  Part  Select  Card  Edit  Errors  list.  If  more  than  20  select  cards 
are  input,  the  excess  cards  are  rejected  and  are  also  displayed  on  the 
edit  list. 

Table  3.2-8  contains  the  report  specifications.  Figure  3.2-8  il- 
lustrates the  edit  list. 
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TABLE  3.2-8 


REPORT  SPECIFICATION 
PART  SELECT  CARD  EDIT  ERRORS  LIST 


GENERATING  PROGRAM;  RPOIOD 
FREQUENCY;  On-demand 

REPORT  HEADER;  PART  SELECT  CARD  EDIT  ERRORS 
FOR  PROCESSING  DATE  MO/DA/YR 

ORGANIZATION ; Report  lines  are  printed  in  the  order  in 
which  the  cards  are  input  to  the  program. 

CONTENTS ; 

There  are  two  report  lines  for  each  input  record  rejected. 

The  first  line  displays  the  contents  of  the  input  record.  The 
second  line  contains  an  asterisk  under  the  low  order  byte  position 
of  each  field  in  error. 
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FIGURE  3.2^ 

PART  SELECT  CARD  EDIT  ERRORS 


3.2.9  Selection  Card  Edit  List 


The  user  may  obtain  a listing  of  the  Inventory  Master  File  records 
of  specified  items  through  execution  of  the  Inventory  Master  File  List 
program,  INVEST.  The  items  for  which  the  listing  is  to  be  generated  are 
specified  to  the  system  through  the  entry  of  select  cards.  During  pro- 
gram execution,  these  cards  are  edited  and  if  an  error  is  discovered, 
the  contents  of  the  input  record  are  displayed  on  the  Selection  Card 
Edit  List. 

Table  3.2-9  contains  the  report  specifications.  The  listing  is 
illustrated  in  Figure  3.2-9. 
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TABLE  3.2-9 


REPORT  SPECIFICATION 
SELECTION  CARD  EDIT  LIST 


GENERATING  PROGRAM;  INVEST 
FREQUENCY;  On-demand 

REPORT  HEADER;  SELECTION  CARD  EDIT  LIST 
FOR  MO/DA/YR 

ORGANIZATION ; Report  lines  are  printed  in  the  order 
in  which  the  select  cards  are  input  to 
the  program. 

CONTENTS ; 

There  are  two  report  lines  for  each  input  record  rejected.  The 
first  line  displays  the  contents  of  the  input  record.  The  second  line 
contains  an  asterisk  under  the  low  order  byte  position  of  each  field 
in  error. 
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FIGURE  3.2-9 

SELECTION  CARO  EDIT  LIST 


3.2.10  Price  Correction  Edit  List 


The  user  may  correct  a Purchase  Order  Price  after  a receipt  against 
the  Purchase  Order  has  been  processed  through  execution  of  the  Price 
Correction  Processor  program,  DA250,  The  new  Purchase  Order  price  is 
input  through  a Price  Correction  card.  Card  input  is  edited  during 
program  execution  and  if  an  error  is  detected,  the  contents  of  the  input 
record  are  displayed  on  the  Price  Correction  Edit  List. 

Table  3.2-10  contains  the  report  specifications.  The  listing  is 
illustrated  in  Figure  3.2-10. 
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TABLE  3. -2-10 


REPORT  SPECIFICATION 
PRICE  CORRECTION  EDIT  LIST 


GENERATING  PROGRAM:  DA250 

FREQUENCY ; On-demand 

REPORT  HEADER;  PRICE  CORRECTION  EDIT  LIST 

ORGAN IZAT ION ; Report  lines  are  printed  in  the  order 
in  which  price  correction  cards  are 
input  to  the  program. 

CONTENTS ; 

There  are  two  report  lines  for  each  input  record 
rejected.  The  first  line  displays  the  contents  of  the 
input  record.  The  second  line  contains  an  asterisk  under 
the  low  order  byte  position  of  each  field  in  error  or  an 
indicative  message. 
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FIGURE  3.2  10 

PRICE  CORRECTION  EDIT  LIST 


3.2,11  Inventory  Quantity  Edit  List 


During  the  processing  of  the  Inventory  Master  Cards  by  the 
Inventory  Quantity  Adjustment  program,  INVQTY,  the  input  records  are 
edited  as  to  field  content  and  must  also  meet  the  following  tests: 

(a)  the  House  Inventory  Number  must  be  on  file;  and 

(b)  if  more  than  one  record  is  entered  for  an  item; — that  is, 
to  enter  quantities  counted  at  the  main  storeroom  and 
all  ancillary  storerooms — the  number  of  input  records 
must  correspond  to  the  number  of  division  stock  records 
on  file  plus  one  (for  the  main  storeroom). 

If  the  input  does  not  meet  these  edit  criteria,  the  appropriate 
input  record  or  records  are  rejected  and  their  contents  displayed  on  the 
Inventory  Quantity  Edit  List. 

Table  3.2-11  contains  the  report  specifications.  The  listing  is 
Illustrated  in  Figure  3.2-11. 
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TABLE  3.2-11 


REPORT  SPECIFICATION 
INVENTORY  QUANTITY  EDIT  LIST 

GENERATING  PROGRAM;  INVQTY 

FREQUENCY ; On-demand 

REPORT  HEADER;  INVENTORY  QUANTITY  EDIT  LIST 

ORGANIZATION ; Report  detail  lines  are  sequenced  in  ascending 
order  by: 

House  Inventory  number 
Division  number 

CONTENTS;  Two  report  lines  are  printed  for  each  input  record 
rejected  or  missing.  The  first  line  displays  the 
contents  of  the  input  record  for  the  file  record. 
The  second  line  contains  an  asterisk  under  the  low 
order  byte  position  of  each  field  in  error  or  an 
indicative  message. 
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FIGURE  3.2-11 

INVENTORY  QUANTITY  EDIT  LIST 


3.2.12  Missing  Inventory  Cards  List 

During  execution  of  the  Inventory  Quantity  Adjustment  program, 
INVQTY,  the  records  for  each  Inventory  Item  on  file  are  read.  If  no 
Inventory  Master  card  has  been  entered  for  the  Item,  It  Is  listed  on 
the  Missing  Inventory  Cards  List. 

Table  3.2-12  contains  the  report  specification.  The  listing  Is 
Illustrated  In  Figure  3.2-12. 
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TABLE  3.2-12 


REPORT  SPECIFICATION 
MISSING  INVENTORY  CARDS  LIST 


GENERATING  PROGRAM;  INVQTY 
FREQUENCY;  On-demand 

REPORT  HEADER:  INVENTORY  CARDS  WERE  NOT  PROVIDED  FOR  LISTED  ITEMS 

ORGANIZATION ; Report  detail  lines  are  sequenced  by 
house  inventory  number  in  ascending 
order. 

CONTENTS:  DESCRIPTION 


House  number 
Item  Name 


House  Inventory  number 
Short  description  of  the  item 
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3.2.13  Division  Inventory  Quantity  Edit  List 

During  execution  of  the  Division  Stock  Reconciliation  program, 
INVDIV,  the  Input  records  are  checked  as  follows: 

(a)  the  content  of  the  Input  record  fields  is  edited, 

(b)  the  validity  of  the  house  inventory  number  is  checked, 
and 

(c)  there  must  be  an  input  record  for  each  division  stock 
(49)  record  on  file. 

If  an  input  transaction  does  not  meet  the  edit  criteria,  then  either 
the  contents  of  the  input  record  or  of  the  division  stock  record  are 
displayed  on  the  Division  Inventory  Quantity  Edit  List. 

Table  3.2-13  contains  the  report  specification.  The  listing  is 
illtistrated  in  Figure  3.2-13. 
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TABLE  3.2-13 


REPORT  SPECIFICATION 
DIVISION  INVENTORY  QUANTITY  EDIT  LIST 


GENERATING  PROGRAM;  INVDIV 
FREQUENCY;  On- demand 

REPORT  HEADER;  DIVISION  INVENTORY  QUANTITY  EDIT  LIST 

ORGAN I Z AT ION ; Report  detail  lines  are  sequenced  in 
ascending  order  by; 

House  inventory  number 
Division  number 


CONTENTS ; 

Two  report  lines  are  printed  for  each  input  record  rejected 
or  missing.  The  first  line  displays  the  contents  of  the  input 
record  or  the  file  record.  The  second  line  contains  an  asterisk 
under  the  low  order  byte  position  of  each  field  in  error  or  an 
indicative  message. 
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DIVISION  INVENTORY  OUANITY  EDIT  LIST 


740430  01  002043  GEAR  ASSY  EA  0001000 

PART  NUMBER  IS  NOT  ON  MASTER  FILE  FOR  THIS  DIVISION 


740430  01  002043  GEAR  ASSY  EA  0001000 

PART  NUMBER  IS  NOT  ON  MASTER  FILE  FOR  THIS  DIVISION 


M00430  01  002043  GEAR  ASSY 


EA  0001000 


C4  020400  BRAKE  BLOCK 
DIVISION  INVENTORY  CARD 

C4  022213  ROLLER 
DIVISION  INVENTORY  CARD 

C4  024158  CAMSHAFT 
DIVISION  INVENTORY  CARO 

C4  024191  BUSHING 
DIVISION  INVENTORY  CARD 


WAS 

03 

NOT 

PROVIDED 

FOR 

ITEM 

WAS 

04 

NOT 

PROVIDED 

FOR 

ITEM 

WAS 

03 

NOT 

PROVIDED 

FOR 

ITEM 

WAS 

04 

NOT 

PROVIDED 

FOR 

ITEM 

FIGURE  3.2-13 

DIVISION  INVENTORY  QUANTITY  EDIT  LIST 
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3.2.14  Vendor  File  Edit  List 


During  execution  of  the  Vendor  Reference  File  Start-Up  program, 
VENDOl,  input  records  are  edited.  If  an  input  record  does  not  meet 
the  edit  criteria,  the  contents  of  the  record  are  displayed  on  the 
Vendor  File  Edit  List. 

Table  3.2-14  contains  the  report  specification.  The  listing  is 
illustrated  in  Figure  3.2-14. 
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TABLE  3.2-14 


REPORT  SPECIFICATION 
VENDOR  FILE  EDIT  LIST 


GENERATING  PROGRAM;  VENDOl 
FREQUENCY : Once,  at  system  start-up 

REPORT  HEADER;  VENDOR  FILE  EDIT  LIST 

ORGANIZATION;  Report  lines  are  printed  in  the  order  in 
which  the  input  records  are  submitted. 

CONTENTS; 

Two  report  lines  are  printed  for  each  input  record  rejected. 
The  first  line  displays  the  contents  of  the  input  record.  The 
second  line  contains  an  asterisk  under  the  low  order  byte  position 
of  each  field  in  error. 
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FIGURE  3.2  14 
VENDOR  FILE  EDIT  LIST 


3. 3 File  Listings 


Reports  have  been  designed  to  display  to  the  user  the  contents  of 
the  records  In: 

(a)  the  Imzentory  Master  File;  and 

(b)  the  Vendor  Reference  File. 

The  listings  provide  the  user  with  a capability  to  verify  that 
those  records  are  correct  and  may  assist  In  the  analysis  of  possible 
data  problems. 
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3.3.1  Inventory  Master  File  List 

The  Inventory  Master  File  List  is  an  on-demand  report,  requested  by 
the  user.  The  listing  displays  the  contents  of  the  Inventory  Master 
File  records.  The  records  are  reformatted  for  the  purpose  of  printing. 

This  facilitates  the  use  and  interpretation  of  the  listing. 

The  user  request  is  specified  to  the  system  in  the  form  of  options. 
These  options  specify  the  materials  for  which  the  listing  is  to  be  generated 
and  the  types  of  records  to  be  displayed.  The  user  may  specify: 

(a)  a single  house  inventory  number, 

(b)  a range  of  house  inventory  numbers,  or 

(c)  all  items  on  file. 

The  user  may  also  specify  the  types  of  records  to  be  displayed: 

(a)  all  records  except  Purchase  Order  records, 

(b)  all  records  except  monthly  activity  records,  or 

(c)  all  records. 

Table  3.3-1  contains  the  report  specifications.  The  listing  is 
illustrated  in  Figure  3.3-1. 
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TABLE  3.3-1 


REPORT  SPECIFICATION 
INVENTORY  MASTER  FILE  LIST 


GENERATING  PROGRAM:  INVLST 

FREQUENCY ; On-demand 

REPORT  HEADER;  INVENTORY  MASTER  FILE  LIST 

FOR  MO/DA/YR 

ORGANIZATION ; Detail  report  lines  are  sequenced  In  ascending 
order  by: 

House  Inventory  number 
File  record  format  code 
File  record  date 

The  first  line  for  each  Inventory  Item  ponslsts 
of  the  House  Inventory  Number  and  Item  Name. 

CONTENTS : 

There  are  no  column  headings.  The  Information  displayed  for 
each  house  Inventory  number  depends  on  the  record  option. Included 
In  the  report  request.  The  following  Information  is  always  displayed: 

Unit  of  Issue 

Sales  tax  factor 

Date  Item  established  on  file 

Reorder  point 

Averse  unit  price 

On-hand  quantity 

On-order  quantity 

Beginning  Inventory  value 

Date  of  last  Issue 

Quantity  Issued 

This  basic  Information  Is  followed  by  Purchase  Order  records 
and/or  monthly  activity  records » depending  on  the  report  option. 
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FIGURE  3.3  1 

INVENTORY  MASTER  FILE  LIST 


3.3.2  Vendor  File  List 


The  Vendor  File  List  is  an  on-demand  report  requested  by  the  user. 
The  listing  displays  the  contents  of  the  Ven^^r  Name  records  from  the 
Vendor  Reference  File.  The  records  are  reformatted  for  the  purpose 
of  printing.  This  facilitates  the  use  and  interpretation  of  the  listing. 

The  user  may  limit  the  extent  of  the  listing  by  specifying  a range 
of  vendor  codes  in  the  request  card.  If  no  range  is  specified,  the 
listing  viill  include  all  vendor  codes  and  names  up  to  vendor  10,000. 

This  upper  limit  is  included  in  the  software  to  limit  program  execution 
time  as  accessing  the  ISAM  Vendor  Reference  File  can  be  time  consuming. 

Table  3.3-2  contains  the  report  specifications.  The  llat  is 
illustrated  in  Figure  3.3-2. 
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TABLE  3.3-2 


REPORT  SPECIFICATION 
VENDOR  FILE  LIST 

GENERATING  PROGRAM;  RP024 
FREQUENCY;  On- demand 
REPORT  HEADER;  VENDOR  FILE 

ORGAN IZAT ION ; Report  detail  lines  are  sequenced  by  vendor 
code  in  ascending  order. 


CONTENTS 

COLUMN  HEADER 

DESCRIPTION 

Date 

Date  when  vendor  name  record  established 

Vendor  Code 

Vendor  code 

Vendor  Name 

Name  of  vendor 
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VENDOR 


DATE 

CODE 

Od/lR/72 

00355 

03/19/ 72 

00365 

OS/19/72 

003  70 

OB/19/72 

00400 

OB/  19/72 

00415 

JB/  19/ 72 

00430 

08/19/72 

004  5 0 

08/23/ 73 

004  6 5 

OB/19/72 

0 04  70 

10/12/72 

00485 

06/08/73 

00505 

08/19/  72 

005  10 

08/19/72 

0052  0 

08/19/72 

0 0535 

08/19/ 72 

00538 

08/ 19/72 

00540 

12/07/72 

00545 

05/04/73 

00547 

10/12/  /3 

00549 

08/19/72 

00550 

08/19/72 

00555 

08/19/ 72 

00560 

08/19/72 

006  00 

08/19/72 

006  1C 

11/06/ 73 

0061  5 

05/30/ 73 

006  2 0 

08/19/72 

0062  5 

08/19/72 

00640 

08/31 /73 

00642 

03/30/73 

00643 

08/19/ 72 

00645 

08/19/72 

00650 

02/27/ 73 

006  5 5 

08/19/72 

006  6 0 

08/19/72 

006  3 0 

D8/19/72 

00750 

08/19/72 

00775 

08/19/72 

00300 

08/19/72 

00815 

08/19/72 

00820 

AC  TRANSIT 

VENDOR  FILE  03/05/74 

PAGE 


VENDOR  NAME 


AMERICAN  TRANSIT  ASSOCIATION 
ANSUL  CHEMICAL  COo  FIRE  EOUIPo  DlVo 
ARDMOR  CHEMICAL  CO. 

ARMATLRE  t IGNITION  SUPPLY  CO. 
ASSOCIATED  BATTERY  ASSEMBLERS 

ASSOCIATED  STATIONERS,  INC. 

ATLAS  WELDING  SUPPLY 

AUTO  RADIO  HFADOUARTERS 

AUTOMOTIVE  ENGINEERING  CO. 

AVENLE  AUTO  WRECKING 

CHARLES  M BA  I LEY 
BANKERS  PRINT  I NG  CD, 

BANNER  COMPANY 

RALEIGH  W.  BARBOUR  CJRP, 

WILLIAM  BARRON  CANDY  CO. 

BAY  AREA  PETROLEUM  INC. 

BAY  CITY  DISPOSAL  CO 
DAY  CITIES  fire  EXT  CO 

BASTON  TIRE  AND  SUPPLY  CO  INC 

BAY  CITY  SCREW  £ BJLT  CO. 

BAY  ENGINE  £ PARTS  CO. 

BAY  RLBBER  COMPANY 
BEARING  ENGlNcERING  CO. 

BEARING  SPECIALTY  CO. 

DELL  METAL  FABRICATORS 

BENKISER  ELECTRIC  MOTORS 

BENSON  TRUCK  PARTS  £ SHOP  EQUIP. 
BERGMAN  BANNER  CO. 

BERKELEY  DAILY  GAZETTE 

BERKELEY  EQUIPMENT  RENTALS 

BERKELEY  OFFICE  EQUIP.  CO. 

BERKELEY  READY  MIX  CO. 

KEN  BETTS  TOWING  SERVICE 

BETTS  SPRING  COMPANY 
BLACK  £ DECKER  MFG.  CO. 

BLACC  PRINTERS,  INC. 

BLAKE,  MOFEITT  £ TOWNE 
OULT  PRODUCTS,  INC. 

BURDEN  DECAL  COMPANY 
DOSS  RENTAL  SERVICE 

FIGURE  3.3-2 
VENDOR  FILE  LIST 


3.3.3  Initial  Vendor  File  Listing 

At  system  start-up,  the  Vendor  Reference  file  must  be  initialized 
by  executing  program  VENDOl.  This  program  is  executed  as  step  one  of 
system  procedure  INVENT).  The  second  step  executes  IBM  utility  lEBISAM 
to  print  the  vendor  name  records  that  have  been  initialized. 

The  report  produced  is  the  Initial  Vendor  File  Listing.  Table  3.3-3 
contains  the  report  specification.  The  listing  is  illustrated  in  Figure 
3.3-3. 
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TABLE  3.3-3 


REPORT  SPECIFICATION 
INITIAL  VENDOR  FILE  LIST 

GENERATING  PROGRAM;  lEBISAM 
FREQUENCY ; Once,  at  system  start-up 
REPORT  HEADER;  None  printed 

ORGANIZATION:  Report  detail  lines  are  sequenced  by  vendor  code 

in  ascending  order. 

CONTENTS ; 

There  are  no  columnar  headings.  For  each  vendor  record,  two 
lines  are  printed.  The  first  gives  the  record  count,  and  the  second 
gives  the  record  content. 
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3.4  Error  Messages 


In  addition  to  the  error  messages  generated  by  transaction  edit 
and  update  ..procedures  (see  Section  3.2),  there  are  error  messages  designed 
to  Inform  the  user  of  problems  during  system  execution.  The  messages 
are  printed  In  lieu  of  the  report  generated  by  the  program.  Some  errors 
are  serious  enough  to  result  In  cancellation  of  the  system  run. 

The  Inventory  System  error  messages  and  the  programs  with  which  they 
are  associated  are  listed  In  T£@le  3.4-1.  Also  given  Is  the  effect 
that  the  error  has  on  the  system.  The  messages  are  listed  according  to 
error  type.  See  Section  7.0  for  the  exact  message  woxd-lng  In  each  pro- 
gram, , and  a description  of  the  cause  of  the  error. 
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TABLE  3.4-1 


SIMS  INVENTORY  SYSTEM  ERROR  MESSAGES 


Sfection  Ref. 

Message 

Generating 

For  Program 

System 

IZEB 

Program 

Description 

Action 

INVENTORY  MASTER 

DG300 

7.3 

S 

FILE  OUT  OF  SEQUENCE 

RPOIOD 

7.6 

S 

RP013 

7.8 

S 

RP014 

7.9 

S 

RP017 

7.11 

S 

RP018 

7.12 

S 

RP022 

7.14 

S 

CLASS  MASTER  FILE 

DG300 

7.3 

S 

OUT  OF  SEQUENCE 

RP020 

7.13 

S 

TRANSACTION  FILE 
OUT  OF  SEQUENCE 

DG300 

7.3 

S 

INVENTORY  ACTIVE 

RPOIOC 

7.5 

S 

MASTER  OUT  OF  SEQUENCE 

RPOll 

7.7 

S 

NO  DATE  RECORD  OR 

RPOll 

7.7 

P 

INVALID  DATE  RECORD 

RP013 

7.8 

P 

FOUND  IN  DATE  FILE 

RP014 

7.9 

P 

RP017 

7.11 

P 

RP018 

7.12 

P 

RP020 

7.13 

P 

RP022 

7.14 

P 

INWADJ 

7.19 

S 

INVCADJ 

7.20 

s 

INVCOUNT 

7.21 

N 

INVQTY 

7.22 

N 

INVDIV 

7.23 

N 

DATA  ERROR  IN 

RP013 

7.8 

N 

CONSTANTS  FILE 

RP022 

7.14 

P 

CURRENT  TRANSACTION 
FILE  OUT  OF  SEQUENCE 

RP016 

7.10 

P 

CLASS  RECORDS  NOT 
ON  FILE  FOR  REPORT 
PERIOD 

RP020 

7.13 

P 
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TABLE  3.4-1  (CONCLUDED) 


SIMS  INVENTORY  SYSTEM  ERROR  MESSAGES 


Section  Ref. 

Message 

Generating 

For  Program 

System 

Type 

Program 

Description 

Action 

CLASS  MASTER  FILE 

RP020 

7.13 

P 

HAS  NO  MONTHLY  RECORDS 

NO  TRANSACTIONS  CREATED 

INWADJ 

7.19 

S 

RUN  STOPPED 

NO  RECORDS  FOUND  FOR 

INVCOUNT 

7.21 

N 

REQUESTED  CLASS  RANGE 

CLASS  CODE  OUT  OF 

INVCOUNT 

7.21 

N 

SEQUENCE 

INVQTY 

7.22 

N 

INVDIV 

7.23 

N 

Note:  The  error  Initiates  system 

action  as  follows: 

(1)  S:  execution  of  the  entire  job  Is  cancelled; 

(2)  P:  only  program  execution  Is  cancelled;  and 

(3)  N:  no  action  Is  taken.  The  message  Is  a 

warning,  program  execution  continues. 
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3.5  Card  Output 


The  Inventory  Master  Card  Generator  program,  INVCOUNT,  generates 
a card  deck  rather  than  a printed  report.  The  cards  produced  are  de- 
signed for  use  under  physical  inventory  procedures.  One. card  is  punched 
for  each  inventory  item  at  each  storeroom.  Output  data  punched  in  a 
card,  and  interpreted,  includes: 

Date  of  physical  inventory  count. 

House  inventory  number. 

Item  name. 

Unit  of  issue. 

Quantity  entry  indicator  (QTY  =), 

Division  code  (for  ancillary  storerooms  only),  and 
Card  sequence  number. 

The  cards  are  used  during  physical  inventory  to  record,  manually, 
the  quantity  counted;  this  information  is  subsequently  punched  into  the 
cards.  The  card  deck  then  becomes  input  to: 

(a)  the  Inventory  Quantity  Adjustment  program,  INVQTY;  and 

(b)  the  Division  Stock  Reconciliation  program,  INVDIV. 

The  format  of  the  Inventory  Master  Card  is  illustrated  in  Figure 
3.5-1. 
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FIGURE  3.5-1 

OUTPUT  RECORD  FORMAT  FOR  INVENTORY  MASTER  CARD 


4.0  SIMS  INVENTORY  SYSTEM  INPUTS 


The  input  to  the  SIMS  Inventory  System  consists  of  transaction 
records,  date  cards,  and  JCL  cards. 

Transaction  records  are  input  to  the  system  in  the  form  of  80- 
character  card  images.  The  system  is  designed  to  accept  either  card 
or  tape  input,  but  the  JCL  described  in  this  section  and  in  Section  5.0 
require  modification  for  the  latter  type  of  input.  ACTD  input  is  in  the 
form  of  a card  deck;  DTS  input  is  on  800  bpi  unblocked  magnetic  tape. 

The  standard  formats  of  the  transaction  records  acceptable  to  the 
SIMS  Inventory  System  are  described  in  Section  4.1.  Input  record  for- 
mats that  are  specific  to  either  ACTD  or  DTS  are  not  described  in  this 

section.  They  are  described  in  Sections  6.16  and  6.17,  respectively. 

The  input  record  formats  that  are  specific  to  a property  are  converted 
to  the  standard  SIMS  formats  by  means  of  a user  input  processor 
program.  Section  7.1  describes  a program  illustrative  of  this  type. 

Section  4.2  describes  the  formats  of  special-purpose  input  records 
entered  in  the  SIMS  Inventory  System.  These  input  records  are  designed 
for: 

(a)  entry  and  updating  of  inventory  system  constants; 

(b)  updating  of  vendor  name  records, 

(c)  Purchase  Order  price  correction, 

(d)  transaction  history  selection, 

(e)  file  record  selection, 

(f)  vendor  record  selection,  and 

(g)  vendor  file  initialization. 
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Date  cards  and  JCL  cards  control  the  execution  of  the  programs. 


These  Inputs  are  described  In  Sections  4.3  and  4.4. 
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4.1  Standard  Inventory  Transaction  Records 

This  section  describes  and  illustrates  the  standard  set  of  input 
formats  for  inventory  transaction  records.  Each  record  format  is 
associated  with  a specific  set  of  transaction  codes,  described  in  Table 
4.1-1.  In  the  following  subsections,  each  format  is  described  in  terms 
of  the  input  requirements  associated  with  each  transaction  code  within 
the  set  indicated. 

All  transactions  records  contain  a two-character  transaction  code, 
in  the  first  two  character  positions.  The  first  character  identifies 
the  type  of  transaction;  the  second  character  identifies  the  file  up- 
dating function  to  be  performed.  These  functions  are: 

Second  Character  Updating  Function 

A Create  or  modify  file  record, 

except  subtraction  of  trans- 
action quantity  data  from  file 
quantity  data 

N Subtract  transaction  quantity 

data  from  file  quantity  data 

X Delete  file  record  or  records 

All  transaction  records  also  contain  the  date  of  the  transaction, 
the  house  inventory  number  of  the  materials  item  and,  with  the  exception 
of  the  Item  Description  and  Division  Stock  records,  its  unit  of  issue. 
These  are  the  mandatory  data  elements. 
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TABLE  4.1-1 


INVENTORY  INPUT  RECORDS 
AND  TRANSACTION  CODES 


SEC. 

TRANSACTION 

REF. 

RECORD  TYPE 

CODES 

4.1.1 

Item  Characteristics 

AA, 

AX 

4.1.2 

Item  Description 

BA, 

BX 

4.1.3 

Division  Stock 

DA, 

DX 

4.1.4 

Purchase  Order 

OA, 

ON,  OX 

4.1.5 

Materials  Receipt 

6A, 

6N 

4.1.6 

Vendor  Return 

7A. 

7N 

4.1.7 

Materials  Issue 

8A, 

8N 

lA, 

IN 

4.1.8 

Adjustment 

2A, 

2N 

3A, 

3N 

4A, 

4N 

9A, 

9N 

4.1.9 

Average  Unit  Price 

EA 

Change 


TRANSACTION  TYPE 

Item  Characteristics 

Item  Description 

Division  Stock 

Purchase  Order 

Materials  Receipt 

Vendor  Return 

Materials  Issue 
Return  to  Stores 

Positive  Quantity  Adjust 
ment 

Negative  Quantity  Adjust 
ment 

Disposal  of  Surplus 
Value  Adjustment 

Average  Unit  Price 
Change 
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4.1.1  Item  Characteristics  Record  (AA,  AX) 

The  Item  Characteristics  Record  is  the  first  inventory  transaction 
record  entered  in  the  system.  The  entry  of  the  initial  record  for  the 
inventory  item  causes  the  necessary  minimum  number  of  records  to  be 
created  in  the  Inventory  Master  File.  The  entry  of  this  record  for  the 
first  item  within  an  inventory  class  similarly  causes  the  creation  of 
the  basic  records  in  the  Inventory  Class  Master  File.  The  Item 
Characteristics  record  is  not  entered  for  materials  that  are  "direct 


charge"  items. 

The  Item  Characteristics  Record,  normally  contains  the  transaction 


code  AA.  It  is  used  to  enter; 


(a)  the  house  inventory  nvimber  that  identifies  the  material 
item  to  the  system; 

(b)  the  date  after  which  records  are  to  be  maintained  in 
the  computer  file; 

(c)  a short  name  (Item  Name)  for  the  materials  item,  up  to 
15  characters  in  length; 

(d)  the  unit  of  issue  (see  Table  7.3-2  for  a listing  of  the 
valid  units  of  issue); 

(e)  the  reorder  point.  This  mandatory  data  element  may 
be  numeric  or  one  of  two  alphabetic  abbreviations. 

These  are  "AR"  (As  Required)  or  "DNR"  (Do  Not  Reorder) . 
Entry  of  either  alphabetic  abbreviation  automatically 
suppresses  the  generation  of  reorder  notices  for  the 
item.  A reorder  point  of  "AR"  should  be  entered  for 
free  stores  items; 
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(f)  a sales  tax  factor.  Entry  of  this  data  element  is 
optional.  It  is  entered  if  the  item  is  subject  to 
sales  tax '(or  tax-exempt)  at  a rate  other  than  the 
rate  that  is  generally  applicable  (see  Section  4.2.1); 
and 

(g)  a change  or  correction  of  the  Item  Name,  reorder 
point,  sales  tax  factor,  or  unit  of  issue. 

The  Item  Characteristics  Record  is  also  used  to  delete  all  records 
for  the  item  from  the  Inventory  Master  File.  Input  values  consist  of 
the  transaction  code,  AX,  the  effective  date,  the  house  inventory  number, 
and  the  unit  of  issue.  Used  in  this  mode,  the  transaction  will  be  pro- 
cessed if: 

(a)  the  on-hand  quantity  is  zero;  and 

(b)  the  on-order  quantity  is  zero. 

Figure  4.1-1  describes  the  format  of  the  Item  Characteristics 
Record.  This  record  consists  of  the  following  data  items: 


Character 

Position 

Data  Item 

COBOL 
Field  Name 

1-2 

Transaction  code  (AA,  AX) 

I-TR-CDE 

3-8 

Transaction  date 

I-TR-DTE 

9-19 

House  Inventory  niimber 

I-TR-PART-NBR 

20-34 

Item  name 

I-TR-NAME 

35-36 

Unit  of  issue 

I-TR-UNIT-MSRE 

37-40 

Reorder  point 

I-TR-REORDER-PT 

41-45 

Filler 

FILLER 

46-50 

Sales  tax  factor 

I-TR-TAX-FACT 

51-54 

Markup  factor  (not  used) 

I-TR-MAEKUP 

55-80 

Filler 

FILLER 

4-6 


1 

FILLER 

1 

■o 

MARK-IIP  FACTOR  (NOT  USED) 
9v9(3) 

i 

O' 

SALES  TAX  FACTOR 
9v9(4) 

1 

'A. 

FILLER 

i 

X 

•<r 

REORDER  POINT 

j 

X 

rM 

UNIT  OF  ISSUE 

I 

X 

2 

ITEM  NAME 

1 

X 

- 

HOUSE  INVENTORY  NUMBER 

I 

X 

>o 

TRANSACTION  DATE  ^ 

f- 

X 

- 

TRANSACTION  CODE  (AA,  AX) 
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FIGURE  4.1  1 

INPUT  RECORD  FORMAT  FOR  ITEM  CHARACTERISTICS  RECORD 


4.1.2  Item  Description  Record  (BA,  BX) 

The  Item  Description  Record  is  an  optional  input  record.  It  is 


designed  for  the  entry  of  a detailed  description  of  the  inventory  item, 
up  to  60  characters  in  length.  The  Item  Name  entered  in  the  Item 
Characteristics  Record  is  an  abbreviation  of  this  description. 

The  Item  Description  Record  normally  contains  the  transaction  code 
BA.  It  is  only  used  to  enter  the  detailed  description.  One  or  two 
file  records  are  created  depending  on  the  length  of  the  description. 

The  file  record  may  contain  up  to  30  characters. 

The  Item  Description  Record  is  also  used  to  delete  the  item  descrip- 
tion file  records.  The  only  data  value  entered  in  addition  to  the  man- 
datory data  elements  is  the  record  purge  indicator.  The  transaction 
code  used  is  BX. 

A change  or  correction  of  the  item  description  is  accomplished  by 
deleting  the  file  records  and  re-entering  the  description. 

Figure  4.1-2  describes  the  format  of  the  Item  Description  Record. 
This  record  consists  of  the  following  data  items: 

Character  COBOL 

Position  Data  Item  Field  Name 


1-2 

3-8 

9-19 

20-79 


80 


Transaction  code  (BA,  BX) 
Transaction  date 
House  inventory  number 
Item  description 
Record  purge  Indicator 


I-TR-PART-NBR 

I-TR-DSCRPTN 

I-TR-CARD-NO 


I-TR-CDE 

I-TR-DTE 
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s 

X 

-4 

RECORD  PURGE  INDICATOR 

I 

X 

s 

ITEM  DESCRIPTION 

X 

- 

HOUSE  INVENTORY  NUMBER 

X 

sO 

-£ 

TRANSACTION  DATE  _a 

s: 

r 

2. 

X 

TRANSACTION  CODE  (BA.  BX) 
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FIGURE  4.1  2 

INPUT  RECORD  FORMAT  FOR  ITEM  DESCRIPTION  RECORD 


4.1.3  Division  Stock  Record  (DA,  DX) 

The  Division  Stock  Record  is  an  optional  input  record.  It  is 
designed  to  enter  the  maximum  desirable,  or  nominal,  stock  level  to  be 
maintained  in  an  ancillary  storeroom.  One  record  is  entered  for  each 
ancillary  storeroom  at  which  stock  is  maintained,  to  a maximum  of  20. 

The  Division  Stock  Record  normally  contains  the  transaction  code 
DA.  It  is  used  to  enter: 

(a)  the  house  inventory  number  of  the  item 
stocked  at  the  ancillary  storeroom; 

(b)  the  effective  date; 

(c)  the  identification  of  the  ancillary  storeroom. 

Normally,  this  is  the  same  as  an  operating 
division; 

(d)  the  nominal  stock  level  of  the  item;  and 

(e)  a change  in  the  nominal  stock  level. 

The  user  should  note  that  a division  stock-level  value  of  *99*  has 
a special  meaning.  This  value  indicates  that  all  the  property  stock 
of  the  item  is  stored  at  the  ancillary  storeroom  identified.  The 
value  ’99'  is  coded  into  the  system  software  and  always  has  the  above 
meaning . 

The  Division  Stock  Record  is  also  used  to  delete  the  Division 
Stock  Status  Record  from  tha  Inventory  Master  File.  Input  values 
consist  of  the  transaction  code,  DX,  the  effective  date,  the  identifica- 
tion of  the  ancillary  storeroom,  and  the  house  inventory  number. 
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Figure  4.1-3  describes  the  format  of  the  Division  Stock  Record 


This  record  consists  of  the  following  data  items: 


Character 

Position 

Data  Item 

COBOL 

Field  Name 

1-2 

Transaction  code  (DA,  DX) 

I-TR-CDE 

3-8 

Transaction  date 

I-TR-DTE 

9-10 

Storeroom  identification 

I-TR-STR-ID 

11-21 

House  Inventory  number 

I-TR-DS-PART-NBR 

22-26 

Nominal  stock  level 

I-TR-MAX-LEVEL 

27-80 

Filler 

FILLER 

4-11 


gl 

FILLER 

1 

<T' 

DIVISION  STOCK  LEVEL 

1 

X 

- 

HOUSE  INVENTORY  NUMBER 

“ 

X 

DIVISION  IDENTIFICATION 

X 

4 

-§■ 

TRANSACTION  DATE  S 

X 

TRANSACTION  CODE  (DA,  DX) 
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FIGURE  4.1  3 

INPUT  RECORD  FORMAT  FOR  DIVISION  STOCK  RECORD 


4.1.4  Purchase  Order  Transaction  (OA,  ON,  OX) 

The  Purchase  Order  Transaction  record  is  used  to  enter; 


(a) 

Purchase  Order  data  for  one  inventory  item 
included  in  a Purchase  Order  written; 

(b) 

to  change  or  correct  the  Purchase  Order  data 
entered;  and 

(c) 

to  delete  the  Purchase  Order  record  from  the 
Inventory  Master  File. 

The  Purchase  Order  Transaction  record  normally  contains  the  trans- 
action code,  OA.  It  is  used  to  enter: 


(a) 

the  Purchase  Order  number; 

(b) 

the  vendor  code; 

(c) 

the  date  of  the  Purchase  Order; 

(d) 

the  estimated  date  of  delivery  (this  item  is  optional); 

(e) 

the  house  inventory  number; 

(f) 

the  unit  of  issue; 

(g) 

the  quantity  ordered; 

(h) 

the  Purchase  Order  price  per  unit  of  issue;  and 

(i) 

accounting  data  (for  purchases  of  free  stores  and 
direct  charge  items  only) . 

The  quantity  ordered  and  the  Purchase  Order  price  must  be  expressed 
in  terms  of  the  unit  of  issue.  If  the  Purchase  Order  document  displays 
quantity  and  price  based  on  another  unit  of  measurement,  then  the  quantity 
ordered,  the  Purchase  Order  price,  and  the  unit  of  measurement  must  be 
changed  before  the  machine- readable  record  is  prepared. 
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The  user  should  note  that  the  price  entered  should  be  the  net  price 
to  be  paid  by  the  property,  exclusive  of  sales  tax.  This  element  of 
cost  is  added  automatically  when  the  materials  receipt  transaction  is 
processed.  Freight  charges  and  cash  discount  are  normally  excluded  from 
inventory  value  because  these  factors  cannot  be  determined  before  the 
receipt  is  processed. 

Changes  to  and  corrections  of  Purchase  Order  data  may  be  made 
through  the  entry  of  incomplete  transactions.  Mandatory  data  items 
entered  are; 

(a)  transaction  code, 

(b)  Purchase  Order  number, 

(c)  house  inventory  number,  and 

(d)  unit  of  issue. 

With  the  exception  of  changes  to  or  correction  of  the  Purchase  Order 
quantity,  the  new  values  of  the  data  items  to  be  changed  are  entered. 
Quantity  data  entered  must,  be  incremental — that  is,  the  difference  be- 
tween the  quantity  on  file  and  the  new  quantity.  The  transaction  code 
entered  for  all  changes  is  'OA*  except  for  a reduction  in  the  quantity 
ordered.  In  this  case,  the  transaction  code  entered  is  'ON'.  The 
user  should  note  that; 

(a)  the  Purchase  Order  price  can  only  be  changed  through 
the  entry  of  a Purchase  Order  Transaction  Record  if 
no  receipt  against  the  Purchase  Order  has  been  pro- 
cessed. Otherwise,  a Purchase  Order  Price  Correction 
transaction  (see  Section  4.2.3)  must  be  entered;  and 

(b)  a change  in  the  Purchase  Order  price  and  a change  in  the 
Purchase  Order  quantity  must  be  entered  as  two  separate 
transactions. 
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The  Purchase  Order  Transaction  record  can  also  be  used  to  delete  the 
record  of  the  Purchase  Order  from  the  Inventory  Master  File,  provided 
that  no  receipt  against  the  Purchase  Order  has  been  processed.  The 
data  items  entered  are: 

(a)  transaction  code,  OX; 

(b)  transaction  date; 

(c)  Purchase  Order  number; 

(d)  house  inventory  number;  and 

(e)  unit  of  issue. 


Purchase  Order  price  and  quantity  must  not  be  entered. 


Figure  4. 

1-4  describes  the  format  of  the  Purchase 

Order  Transaction 

record.  This 

record  consists  of  the  following  data 

items : 

Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-2 

Transaction  code  (OA,  ON, 

OX) 

I-TR-CDE 

3 

Filler 

FILLER 

4-9 

Purchase  order  number 

I-TR-PO-NBR 

10-14 

Vendor  code 

I-TR-VNDR-ID 

15-17 

Filler 

FILLER 

18-23 

Purchase  order  date 

I-TR-PO-DTE 

24 

Filler 

FILLER 

25-30 

Estimated  delivery  date 

I-TR-DLVY-DTE 

31-37 

Filler 

FILLER 

38-48 

House  inventory  number 

I-TR-PO-PART-NBR 

49-50 

Unit  of  issue 

I-TR-PO-UNIT-MSRE 

51-57 

Purchase  order  quantity 

I-TR-PO-QTY 

58-65 

Purchase  order  price 

I-TR-PO-PRICE 

66-69 

Account  number 

I-TR-ACCT-NBR 

70-71 

Sub-account  momber 

I-TR-SUB-ACCT 

72-75 

Work  order  number 

I-TR-WO-NBR 

76-79 

Vehicle  number 

I-TR-EQUIP-NBR 

80 

Fleet  charge  indicator  (6) 

I-TR-FLT-CHG 
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2 

X 

FLEET  CHARGE  INDICATOR  t-6'l 

X 

VEHICLE  NUMBER 

X 

•<r 

WORK  ORDER  NUMBER 

1 

X 

SUB-ACCOUNT  NUMBER 

.i. 

X 

ACCOUNT  NUMBER 

1 

O' 

PURCHASE  ORDER  PRICE 
9(4)v9(4) 

■1 

o^ 

PURCHASE  ORDER  QUANTITY 
9(5)v99 

1 

X 

UNIT  OF  ISSUE 

1 

X 

- 

HOUSE  INVENTORY  NUMBER 

1 

r». 

FILLER 

1 

X 

s£> 

estimated  delivery  date 

— 

t 

X 

sO 

>* 

PURCHASE  ORDER  DATE  o 

X 

X 

I 

la 

FILLER 

1 

.n 

VENDOR  CODE 

O' 

PURCHASE  ORDER  NUMBER 

n 

tN 

FILLER 

X 

TRANSACTION  CODE  (OA,  ON,  OX) 
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FIGURE  4.1-4 

INPUT  RECORD  FORMAT  FOR  PURCHASE  ORDER  TRANSACTION 


4.1.5  Materials  Receipt  Transaction  (6A,  6N) 

The  Materials  Receipt  Transaction  record  Is  used  to  enter: 

(a)  receipt  data  for  one  Inventory  Item  Included  In  a 
receiving  report;  and 

(b)  to  change  or  correct  the  receipt  data  entered. 

The  Materials  Receipt  Transaction  record  normally  contains  the 
transaction  code  6A.  It  Is  used  to  enter: 

(a)  the  Purchase  Order  number, 

(b)  the  date  of  the  receipt, 

(c)  the  house  Inventory  number, 

(d)  the  unit  of  Issue,  and 

(e)  the  quantity  received. 

The  quantity  received  must  be  expressed  In  terms  of  the  unit  of 
Issue.  If  the  receiving  docmnent  displays  quantity  based  on  another  unit 
of  measurement,  then  the  quantity  received  and  unit  of  measurement  must 
be  changed  before  the  machine-readable  record  Is  prepared. 

Changes  to  or  correction  of  a receipt  transaction  Involve  quantity 
data.  Quantity  data  entered  must  be  Incremental — that  Is,  the  difference 
between  the  quantity  on  file  and  the  new  quantity.  If  the  quantity 
on  file  Is  to  be  Increased,  transaction  code  6A  Is  entered;  If  the 
quantity  on  file  Is  to  be  reduced,  transaction  code  6N  Is  entered. 
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Data  items  entered  are: 

(a)  transaction  code, 

(b)  purchase  order  number, 

(c)  house  inventory  nvimber, 

(d)  unit  of  issue,  and 

(e)  incremental  quantity. 


Figure  4.1-5  describes  the  format  of  the  Materials  Receipt 
Transaction  record.  This  record  consists  of  the  following  data  items: 


Character 

Position 

Data  Item 

COBOL 
Field  Neime 

1-2 

Transaction  code  (6A,  6N) 

I-TR-CDE 

3 

Filler 

FILLER 

4-9 

Purchase  order  number 

I-TR-RC-PO-NBR 

10-17 

Filler 

FILLER 

18-23 

Receipt  date 

I-TR-RC-DTE 

24-37 

Filler 

FILLER 

38-48 

House  inventory  number 

I-TR-RC-PART-NBR 

49-50 

Unit  of  issue 

I-TR-RC-UNIT-MSRE 

51-57 

Receipt  quantity 

I-TR-RC-QTY 

58-80 

Filler 

FILLER 

4-18 


1 

Sk 

a 

FILLER 

1 

O' 

r*. 

QUANTITY  RECEIVED 
9(5)v99 

1 

X 

UNIT  OF  ISSUE 

X 

= 

HOUSE  INVENTORY  NUMBER 

f 

- 

FILLER 

2 

X 

>- 

S- 

RECEIPT  DATE  §- 

i: 

1 

(S 

FILLER 

z 

vC 

PURCHASE  ORDER  NUMBER 

n 

A 

— 

FILLER 

X 

TRANSACTION  CODE  (6A,  6N) 
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FIGURE  4 1-5 

INPUT  RECORD  FORMAT  FOR  MATERIALS  RECEIPT  TRANSACTION 


4.1.6  Vendor  Return  Transaction  (7A,  7N) 

The  Vendor  Return  Transaction  record  is  used; 

(a)  to  enter  data  for  the  return  of  one  inventory  item  to 
a vendor,  and 

(b)  to  change  or  correct  the  vendor  return  data  entered. 

The  Vendor  Return  Transaction  record  normally  contains  the  trans- 
action code  7A.  It  is  used  to  enter: 

(a)  a document  number  for  reference.  For  example,  this 
document  may  be  a Shipping  Report  or  a Returned  Goods 
Report; 

(b)  the  vendor  code; 

(c)  the  date  of  the  return  to  vendor; 

(d)  the  Purchase  Order  number; 

(e)  the  house  inventory  number; 

(f)  the  unit  of  issue;  and 

(g)  the  quantity  returned. 

The  quantity  returned  must  be  expressed  in  terms  of  the  unit  of 
issue.  If  the  source  document  displays  quantity  based  on  another  unit 
of  measurement,  then  the  quantity  returned  and  unit  of  measurement  must 
be  changed  before  the  machine-readable  record  is  prepared. 

The  user  should  note  that  the  Purchase  Order  against  which  the 
material  item  was  originally  received  should  be  the  document  reference 
in  the  transaction. 

Changes  to  or  correction  of  vendor  return  data  may  be  made  through 
the  entry  of  incomplete  transactions.  Mandatory  data  items  entered  are: 

(a)  transaction  code. 
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(b)  Purchase  Order  number; 

(c)  house  inventory  number;  and 

(d)  unit  of  issue. 

The  document  number  or  the  vendor  code  are  changed  through  the  entry 
of  the  new  values.  Quantity  data  entered  must  be  incremental- -that  is, 
the  difference  between  the  quantity  on  file  and  the  new  quantity.  The 
transaction  code  entered  for  all  changes  is  '7A'  except  for  a reduction 
in  the  quantity  returned.  In  this  case,  the  transaction  code  entered 
is  '7N'. 


Figure  4.1-6  describes  the  format  of  the  Vendor  Return  Transaction 
record.  This  record  contains  the  following  data  items: 


Character 

Position  Data  Item 


COBOL 
Field  Name 


1-2 

3 

4-9 

10-14 

15-17 

18-23 

24 

25-30 

31-37 

38-48 

49-50 

51-57 

58-80 


Transaction  code  (7A,  7N) 
Filler 

Document  number 
Vendor  code 
Filler 

Date  of  vendor  return 
Filler 

Purchase  order  number 
Filler 

House  inventory  number 
Unit  of  issue 
Quantity  returned 
Filler 


I-TR-CDE 

FILLER 

I-TR-SHIP-NTC-NBR 

I-TR-VR-VNDR-ID 

FILLER 

I-TR-RETURN-DTE 

FILLER 

I-TR-VR-PO-NBR 

FILLER 

I-TR-VR-PART-NBR 

I-TR-VR-UNIT-MSRE 

I-TR-VR-QTY 

FILLER 
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o 

TT 

lA. 

s 

FILLER 

• 

- 

QUANTITY  RETURNED 
9(5)v99 

e 

X 

- 

UNIT  OF  ISSUE 

7 

« 

e 

• 

» 

X 

= 

HOUSE  INVENTORY  NUMBER 

■5 

X 

ACCOUNT  NUMBEK  (NOT  USED) 

A 

FILLER 

X 

A 

PURCHASE  ORDER  NUMBER 

— 

FILLER 

X 

A 

VENDOR  RETURN  DATE 

£ 

1 

A 

FILLER 

X 

u-» 

VENDOR  CODE 

» 

X 

A 

SHIPPING  REPORT  NUMBER 

— 

FILLER 

X 

CM 

TRANSACTION  CODE  (7A,  7N) 
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FIGURE  4.1  6 

INPUT  RECORD  FORMAT  FOR  VENDOR  RETURN  TRANSACTION 


4.1.7  Issue  Transaction  ^8A,  8N,  lA,  IN) 

The  Issue  Transaction  record  is  used  to  enter: 

(a)  the  issue  of  an  inventory  item  to  a user  depart- 
ment, most  frequently  the  Maintenance  Department. 

The  transaction  code  used  is  8A; 

(b)  the  return  of  an  inventory  item  by  a user  depart- 
ment to  Stores.  The  transaction  code  used  is  lA. 

Such  a return  may  be  made  because: 

(1)  an  excess  quantity  was  requisitioned  originally, 

(2)  the  item  is  defective,  or 

(3)  the  item  is  to  be  rebuilt;  and 

(c)  the  record  of  account  infoinnation  that  describes  the 
charge  or  the  credit  to  be  recognized.  Accounting 
information  associated  directly  with  the  use  of  inven- 
tory items  for  vehicle  maintenance  and  repair  is  input 
to  the  SIMS  Repair  Cost  System. 

Changes  to  or  correction  of  data  are  made  by  entering  a transaction 
that  reverses  the  effect  on  the  Inventory  Master  File  of  the  original 
transaction.  The  reversing  transaction  contains  the  same  accounting  in- 
formation as  the  original  transaction.  The  correct  transaction  is 
then  entered. 

Transaction  code  IN  has  the  same  file  updating  effect  as  the  8A, 
and  the  8N  has  the  same  effect  as  the  lA. 
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Figure  A. 1-7  describes  the  format  of  the  Issue  Transaction  record. 

This  record  contains  the  following  data  items: 

Character  COBOL 

Position  Data  Item  Field  Name 


1-2 

Transaction  code  (8A,  8N,  lA, 

m)  I-TR-CDE 

3-10 

Filler 

FILLER 

11-21 

House  inventory  number 

I-TR-IC-PART-NBR 

22-28 

Quantity  issued  or  returned 

I-TR-IC-QTY 

29-30 

Unit  of  issue 

I-TR-IC-UNIT-MSRE 

31-49 

Filler 

FILLER 

50-55 

Date  of  issue  or  return 

I-TR-IC-DTE 

56-57 

Vehicle  group  code 

I-TR-IC-GRP 

58-59 

Unit  code 

I-TR-IC-UNIT 

60-61 

Work  type/reason  code 

I-TR-IC-WR 

62-63 

Filler 

FILLER 

64-67 

Work  Order  number 

I-TR-IC-WO 

68-71 

Account  number 

I-TR-IC-ACCT 

72-73 

Sub-account  number 

I-TR-IC-SUB 

74 

Equipment  division 

I-TR-IC-EQUIP 

75-78 

Vehicle  number 

I-TR-IC-VEH 

79 

Fleet  charge  Indicator  (6) 

I-TR-IC-FLT 

80 

Issuing  store  identification 

I-TR-IC-DIV 
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s 

X 

- 

ISSUE  DIVISION 

- 

FLEET  CHARGE  INDICATOR  (-6) 

X 

VEHICLE  NUMBER 

z 

X 

- 

EQUIPMENT  DIVISION 

X 

SUB-ACCOUNT  NUMBER 

i 

X 

ACCOUNT  NUMBER 

X 

WORK  ORDER  NUMBER 

1 

FILLER 

S 

X 

o. 

WORK  TYPE/REASON  CODE 

1 

X 

- 

UNIT  CODE 

"s 

X 

VEHICLE  GROUP  CODE 

1 

X 

^^3 

>- 

>- 

ss 

r 

ISSUE  DATE  ^ 

1 

aa 

FILLER 

f 

X 

r. 

UNIT  OF  ISSUE 

2 

O' 

QUANTITY  ISSUED/RETURNED 
9(5)v99 

T 

X 

- 

HOUSE  INVENTORY  NUMBER 

00 

FILLER 

X 

- 

TRANSACTION  CODE  (8A,  8N,  lA,  IN) 
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FIGURE  4.1  7 

INPUT  RECORD  FORMAT  FOR  MATERIALS  ISSUE  TRANSACTION 


4.1.8  Quantity  and  Value  Adjustment  Transactions  (2A,  2N,  3A,  3N, 
4A,  4N.  9A,  9N) 

The  Qviantlty  and  Value  Adjustment  Transactions  record  Is  used  to 
enter  several  types  of  adjustments  that  affect  the  quantity  and  value 
of  Inventory  on-hand.  It  can  also  be  used  to  correct  data  errors  In  the 
original  transaction  record.  The  transaction  codes  Indicate  the  type 
of  transaction  and  processing  functions  to  be  performed.  They  are  de- 
fined as  follows: 


Transaction 

Code Definition  of  Transaction 


2A 


3A 


4A 


2N 


3N 


4N 


9A 

9N 


The  on-hand  quantity  Is  to  be  Increased  to 
reflect  an  additional  quantity  not  Included 
In  the  record  balahce. 

The  on-hand  quantity  Is  to  be  decreased  to 
reflect  Inventory  shrinkage  arising  from 
pilfering,  defective  materials,  and  errors 
In  recording  transactions. 

The  on-hand  quantity  Is  to  be  decreased  to 
reflect  the  disposal  of  Inventory  Items  to 
outside  parties.  Including  the  disposal  of 
materials  for  salvage. 

This  transaction  has  the  effect  of  reversing 
a transaction  coded  2A;  It  Is  used  to  correct 
data  errors. 

This  transaction  has  the  effect  of  reversing 
a transaction  coded  3A;  It  Is  used  to  correct 
data  errors. 

This  transaction  has  the  effect  of  reversing 
a transaction  coded  4A;  It  Is  used  to  correct 
data  errors. 

The  value  of  Inventory  on-hand  Is  to  be  In- 
creased without  changing  the  quantity  on-hand. 

The  value  of  Inventory  on-hand  Is  to  be  de- 
creased without  changing  the  quantity  on-hand. 
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For  all  quantity  adjustment  transactions,  the  quantity  entered  is  in- 
cremental— that  is,  the  difference  between  the  actual  on-hand  quantity  and  the 
the  file  value. 

When  a transaction  to  change  the  quantity  on-hand  is  entered,  the 
corresponding  adjustment  to  inventory  value  is  calculated  automatically. 

The  user  should  also  note  that  when  the  average  unit  price  of  an  item 
is  changed  (see  Section  4.1.9),  the  corresponding  adjustment  to  inven- 
tory value  is  also  calculated  automatically. 

The  entry  of  a document  number  in  any  adjustment  transaction  is 
optional.  The  entry  of  all  other  data  elements  is  mandatory,  except 
that  the  unit  of  issue  is  not  required  in  the  value  adjustment  trans- 
actions (9A,  9N) . 

The  above  transactions  may  also  be  used  to  change  or  correct  an 
adjustment  transaction.  Again,  the  quantity  data  entered  is  incremental. 

Figure  4.1-8  describes  the  format  of  the  Adjustment  Transaction 


record.  This 

record  contains  the  following  data  items: 

Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-2 

Transaction  code  (2A,  2N,  3A, 

3N, 

I-TR-CDE 

4A,  4N,  9A, 

9N) 

3-8 

Adjustment  voucher  number 

I-TR-VOUCHER 

9-14 

Date  of  adjustment 

I-TR-ADJ-DATE 

15-20 

Filler 

FILLER 

21-31 

House  inventory  number 

I-TR-ADJ-PART-NBR 

32-33 

Unit  of  issue 

I-TR-UNIT-MSRE 

34-40 

Adjustment  quantity  or  value 

I-TR-ADJ-QTY 

41-80 

Filler 

FILLER 

4-27 


3 

o 

•<r 

FILLER 

1 

ADJUSTMENT  QUANTITY /VALUE 
9(5)v99 

1 

X 

UNIT  OF  ISSUE 

1 

X 

= 

HOUSE  INVENTORY  NUMBER 

1 

yO 

FILLER 

1 

yO 

ADJUSTMENT  DATE 

3: 

X 

sO 

ADJUSTMENT  VOUCHER  NUMBER 

X 

- 

TRANSACTION  CODE  (2A,  2N,  3A,  3N,  4A.  4N.  9A,  9N) 
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FIGURE  4.1-8 

INPUT  RECORD  FORMAT  FOR  QUANTITY  AND  VALUE  ADJUSTMENT  TRANSACTION 


4.1.9  Average  Unit  Price  Change  Transaction  (EA) 


The  Average  Unit  Price  Change  Transaction  record  is  used  to  enter 
a new  price  to  replace  the  existing  price  for  an  inventory  item  in  the 
Inventory  Master  File.  It  is  normally  used  to  correct  the  price  on  file. 
The  price  entered  must  include  any  applicable  sales  tax.  When  the  trans- 
action is  entered,  an  adjustment  to  the  on-hand  value  of  the  inventory 
item  is  automatically  calculated. 

Figure  4.1-9  describes  the  format  of  the  Average  Unit  Price  Change 


record.  This 
Character 

record  contains  the  following  mandatory  data  items. 

COBOL 

Position 

Data  Item 

Field  Name 

1-2 

Transaction  Code  (EA) 

I-TR-CDE 

3-8 

Date  of  price  change 

I-TR-DTE 

9-19 

House  inventory  number 

I-TR-PART-NBR 

20-34 

Filler 

FILLER 

35-36 

Unit  of  issue 

I-TR-UNIT-MSRE 

37-44 

Average  unit  price 

I-TR-AVG-PRICE 

45-80 

Filler 

FILLER 

4-29 


o 

TT 

FILLER 

« 

♦ 

00 

AVERAGE  UNIT  PRICE 
9(4)v9(4) 

X 

UNIT  OF  ISSUE 

"o' 

• 

FILLER 

■f 

» 

X 

- 

HOUSE  INVENTORY  NUMBER 

X 

sO 

>• 

PRICE  CHANGE  DATE  g 

Z' 

X 

TRANSACIIOH  CODE  (EA) 
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FIGURE  4.1  9 

INPUT  RECORD  FORMAT  FOR  AVERAGE  UNIT  PRICE  CHANGE  TRANSACTION 


4.2  Special  Purpose  Input  Records 


This  section  describes  and  illustrates  the  input  formats  used  to 
update  the  Inventory  System  Constants  File  (Section  4.2.1)  and  the 
Vendor  Reference  File  (Section  4.2.2),  and  those  used  for  special  purposes. 
These  purposes  include: 

(a)  correction  of  a Purchase  Order  price  (Section  4.2.3), 

(b)  selection  of  transaction  history  to  be  listed  (Section  4.2.4), 

(c)  selection  of  Inventory  Master  File  records  to  be  listed 
(Section  4.2.5), 

(d)  selection  of  Vendor  Name  records  to  be  listed  (Section  4.2.6), 
and 

(e)  initialization  of  the  Vendor  Reference  File  (Section  4.2.7). 
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4.2.1  System  Constants  Record  (FA) 

The  System  Constants  Record  is  used  to: 

(a)  enter  the  initial  values  of  user-specific 
system  constants,  and 

(b)  update  those  values. 

Initial  entry  of  the  system  constants  when  the  system  is  installed 
is  mandatory.  The  constants  are  used: 

(a)  as  test  values  during  report  generation, 

(b)  to  perfprm  calculations,  or 

(c)  to  control  the  purging  of  file  records. 

The  system  constants  are: 

(a)  the  reorder  notice  interval.  This  factor,  expressed 
as  a number  of  days,  controls  the  generation  of  the 
Follow-up  Reorder  Notification.  The  initial  notice 
is  generated  when  the  inventory  records  for  an  item 
indicate  that  the  balance  on-hand  and  on-order  is  less 
than  or  equal  to  the  reorder  point.  To  allow  Purchasing 
to  make  a procurement  decision,  prepare  a Purchase 

Order,  and  enter  the  transaction  in  the  system,  the  generation 
of  a follow-up  notice  is  Inhibited  until  the  reorder  notice 
interval  has  elapsed.  Subsequent  follow-up  notices  are 
similiarly  inhibited; 

(b)  the  unfilled  Purchase  Order  interval.  This  factor,  expressed 
as  a number  of  days,  inhibits  the  inclusion  of  recent  pur- 
chase orders  in: 

(1)  Unfilled  Purchase  Orders  Report,  and 

(2)  Outstanding  Purchase  Orders  report; 

(c)  the  low  usage  Interval.  This  factor,  expressed  as  a num- 
ber of  days,  is  used  to  calculate  a test  date  during  the 
generation  of  the  Low  Usage  Materials  Items  report.  The 
value  of  the  factor  is  subtracted  from  the  report  date, 
thus  erecting  the  test  date.  Inventory  items  for  which 
the  date  of  last  issue  Is  earlier  than  the  test  date  are 
included  in  the  report; 
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(d)  sales  tax  factor.  The  Purchase  Order  price  a 
material  does  not  include  sales  tax.  The  tax  is 
recognized  at  the  time  of  receipt  by  multiplying 

the  order  price  by  the  sales  tax  factor.  The  factor^ 
which  is  expressed  to  four  decimal  places,  is  not  the 
tax  rate.  For  example,  if  the  sales  tax  rate  is  5.75 
percent,  the  factor  is  1.0575; 

(e)  number  of  vehicles.  This  factor  is  used  during  the 
generation  of  the  inventory  financial  reports  to  cal- 
culate the  per  vehicle  investment  in  inventory  and  per 
vehicle  value  of  materials  issued; 

(f)  direct  charge  item  purge  factor.  This  factor,  expressed 
in  months,  controls  the  purging  of  file  records  for  direct 
charge  items ; and 

(g)  Purchase  Order  purge  factor.  The  master  file  may  contain 
up  to  20  Purchase  Order  records  for  a material.  To 
conserve  file  space,  closed  records  will  purged  from  the 
file  after  a number  of  months  (the  purge  factor)  provided 
that  two  records  are  retained. 

When  initial  values  are  being  entered,  all  constants  should  be 
coded  to  suit  the  user's  needs.  Values  not  coded  are  given  default 
values  (see  Table  7.2-2). 

The  system  constants  are  updated  through  the  entry  of  an  incomplete 
transaction  containing  the  transaction  code,  FA,  and  the  constant  or 
constants  to  be  updated.  The  new  values  replace  the  existing  values 
on  file.  Fields  not  coded  are  ignored. 
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Figure  4.2-1  describes  the  format  of  the  System  Constants  Record. 
This  record  contains  the  following  data  items; 


Character 

Position 


Data  Item 


COBOL 

Field  Name 


1-2 

Transaction  code  (FA) 

I-TR-CDE 

3-8 

Transaction  date 

I-TR-DTE 

9-23 

Filler 

FILLER 

24-25 

Reorder  notice  interval 

I-TR-REO-NOT-INTRVL 

26-28 

Low  usage  interval 

I-TR-LOW-USE-INTRVL 

29-33 

Sales  tax  factor 

I-TR-SALES-TAX 

34-37 

Number  of  vehicles 

I-TR-NBR-VEH 

38-40 

Unfilled  order  interval 

I-TR-UNFILLED-ORDER 

41-44 

Filler  (reserved  for  mark-up 
factor) 

I-TR-MARKDP-FACTOR 

45-46 

Direct  charge  item  purge  factor 

I-TR-DC-PURGE-MO 

47-48 

Purchase  Order  purge  factor 

I-TR-PO-PURGE-MO 

49-80 

Filler 

FILLER 

4-34 


1 

filler 

1 

PURCHASE  ORDER  PURGE  FACTOR 

1 

O' 

DIRECT  CHARGE  ITEM  PURGE  FACTOR 

X 

•o 

MARKUP  FACTOR  (NOT  USED) 

— 

O' 

UNFILLED  ORDER  INTERVAL 

1 

O' 

NUMBER  OF  VEHICLES 

t 

O' 

SALES  TAX  FACTOR 
9v9(4) 

1 

O' 

LOW  USAGE  INTERVAL 

O' 

- 

REORDER  NOTICE  INTERNAL 

1 

FILLER 

i 

X 

'O 

>- 

TRANSACTION  DATE  g 

z; 

X 

TRANSACTION  CODE  (FA) 
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FIGURE  4.2  1 

INPUT  RECORD  FORMAT  FOR  SYSTEM  CONSTANTS  RECORD 


4.2.2  Vendor  Name  Record  (CA,  CX) 

The  Vendor  Reference  File  contains  one  type  of  record,  the  Vendor 
Name  Record.  This  record  contains  a five-digit  vendor  code  and  the 
vendor  name,  limited  to  40  characters.  The  Vendor  Name  records  are 
used  during  the  generation  of  reports  on  purchasing  activities  to  identify 
vendors,  otherwise  identified  by  vendor  code  only. 

The  Vendor  Name  input  record  normally  contains  the  transaction  code, 
CA.  It  is  used  to  enter  a transaction  date,  the  vendor  code,  and  the 
vendor  name,  irrespective  of  whether  the  record  is  of  a new  vendor  or 
the  name  of  a vendor  on  file  is  being  changed. 

The  Vendor  Name  input  record  may  also  be  used  to  delete  a record 
from  the  Vendor  Reference  File.  Input  values  are  the  transaction  code 
CX,  the  transaction  date,  and  the  vendor  code.  A vendor  name  should  hot 
be  deleted  until  13  months  after  the  last  tr2insactlon  with  the  vendor, 
as  this  is  the  period  of  time  covered  by  the  Vendor  Performance  Report. 

Figure  4.2-2  describes  the  format  of  the  Vendor  Name  Record.  This 
record  contains  the  following  data  items. 


Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-2 

Transaction  code  (CA,  CX) 

I-TR-CDE 

3-4 

Filler 

FILLER 

5-10 

Transaction  date 

I-TR-VNDR-DATE 

11-12 

Filler 

FILLER 

13-17 

Vendor  code 

I-TR-VNDR-CODE 

18-20 

Filler 

FILLER 

21-60 

Vendor  name 

I-TR-VNDR-NAME 

61-80 

Filler 

FILLER 

4-36 


■0 

f 

A. 

FILLER 

T 

X 

o 

VENDOR  NAME 

A 

PO 

FILLER 

1 

a-' 

VENDOR  CODE 

1 

•a. 

>o 

FILLER 

X 

sO 

>• 

o 

“S’ 

TRANSACTION  DATE  ^ 

2. 

c. 

FILLER 

2. 

X 

<N 

TRANSACTION  CODE  (CA,  CX) 
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FIGURE  4.2  2 

INPUT  RECORD  FORMAT  FOR  VENDOR  NAME  RECORD 


4.2.3 


Purchase  Order  Price  Correction  Transaction  (PC) 


Until  a Purchase  Order  for  a material  has  been  at  least  partially 
filled,  the  Purchase  Order  price  can  be  changed  using  standard  input 
transactions,  as  described  in  Section  4.1.4.  The  Price  Correction  input 
record  is  used  to  enter  a new  Purchase  Order  price  after  a receipt  has 


been  processed.  Transactions  of  this  type  are  input  to  a special-purpose 
program.  This  is  the  Price  Correction  Processor  program  DA250,  described 
in  Section  7.18.  Execution  of  the  program  results  in: 


(a)  correction  of  the  Purchase  Order  price; 

(b)  creation  of  reversing  transactions  to  offset  the 
receipt  transaction  and  all  sid>sequent  transactions 
for  the  item.  These  transactions  are  stored  in  a 
temporary  data  set;  and 

(c)  temporary  storage  of  the  original  receipt  transaction 
and  all  subsequent  transactions  for  re-processing. 

The  input  record  is  described  in  Figure  4.2-3.  This  record 
contains  the  following  mandatory  data  items: 


Character 

Position 


Data  Item 


COBOL 
Field  Name 


1-2 

3-13 

14-19 

20-27 

28-80 


Transaction  code  (PC) 
House  Inventory  number 
Purchase  Order  number 
New  Purchase  Order  price 
Filler 


I-CD-PC 

I-CD-pt-NBR 

I-CD-PO-NBR 

I-CD-PRICE 

FILLER 
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I 

s. 

Filler 

1 

O' 

CO 

Purchase  Order  Price 
9(4)v9(4) 

s 

X 

sO 

Purchase  Order  Number 

1 

X 

- 

House  Inventory  Number 

X 

Transaction  Code  (PC) 
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FIGURE  4.2  3 

INPUT  RECORD  FORMAT  FOR  PURCHASE  ORDER  PRICE  CORRECTION  TRANSACTION 


4.2.4  Part  Select  Card 


The  Transaction  History  File  can  be  accessed  and  a listing  of  the 
records  generated  through  execution  of  the  Requested  Materials  Trans- 
action History  Report  Generator  program,  RPOIOD.  The  user  selects  the 
materials  for  which  the  listing  is  to  be  generated  and  may  limit  the 
period  of  transaction  history  displayed  for  each  material  selected. 

One  Part  Select  Card  is  prepared  for  each  materials  item  selected. 
Transaction  history  options  are: 

(a)  No  dates  entered.  The  listing  will  include 
all  transactions  on  file  for  the  item. 

(b)  "From  " date  only  is  entered.  The  listing  will 
include  all  transactions  dated  after  the  date 
entered  in  the  Part  Select  Card. 

(c)  "To"  date  only  is  entered.  The  listing  will 
include  all  transactions  dated  prior  to  the 
date  entered  in  the  Part  Select  Card. 

(d)  "From"  and  "To"  dates  are  entered.  All  trans- 
actions within  the  indicated  date  range  will 
be  displayed. 

A maximum  of  20  Part  Select  Cards  may  be  input  to  the  program 
during  any  one  program  execution.  Figure  4.2-4  describes  the  format 


the  Part  Select  Card. 

This  record  contains  the 

following  data  items 

Character 

Position 

Data  Item 

COBOL 
Field  Name 

1-11 

House  inventory  number 

I-PART-NTJMBER 

12 

Filler 

FILLER 

13-18 

"From"  date  (YYMMDD) 

I-DATEl 

19 

Filler 

FILLER 

20-25 

"To"  date  (YYMMDD) 

I-DATE2 

26-80 

Filler 

FILLER 

4-40 


g 

in 

Filler 

1 

- 

1 

X 

o 

Ending  Dace 

>> 

SL 

- 

Filler 

t 

X 

g 

71 

Beginning  Date 

>- 

- 

FILLER 

i 

X 

- 

House  Inventory  Number 
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FIGURE  4.2  4 

INPUT  RECORD  FORMAT  FOR  PART  SELECT  CARD 


^•2.5  File  Record  Select  Card 


The  Inventory  Master  File  may  be  accessed  and  selected  records 
displayed  through  execution  of  tfie  Inventory  Master  File  List  program, 
INVLST.  This  program  is  described  in  Section  7.17.  The  user  selects 
the  inventory  items  for  which  records  are  to  be  displayed  and  may  also 
limit  the  types  of  records  to  be  included  in  the  listing. 

One  File  Record  Select  Card  is  prepared  for  each  inventory  item 
or  range  of  inventory  items  for  which  the  records  are  to  be  displayed. 
Single  house  inventory  members  are  coded  in  the  low  item  number  field. 
There  is  no  limit  to  the  number  of  select  cards  that  can  be  input  to 
the  program,  but  the  cards  must  be  in  ascending  order  by  house  Inventory 
number.  The  high  item  number  of  a range  must  be  less  than  the  low  item 
number  in  the  following  card. 

Report  option  codes  are: 

(a)  option  code  = 1.  All  records  except  Monthly  Activity 
records  are  displayed;  or 

(b)  option  code  ■ 2.  All  records  except  Purchase  Order 
records  and  Purchase  Order  Accounting  records  are  dis- 
played. 

If  the  report  option  code  is  left  blank,  all  records  for  the  se- 
lected items  are  listed. 
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Figure  4.2-5  describes  the  format  of  the  File  Record  Select 


Card.  This  record  contains  the  following  data  items: 
Character 

Position  Data  Item 


COBOL 

Fiteld  Name 


1-11 

12 

13-23 

24 

25-80 


Low  item  number 
Filler 

High  item  number 
Report  option  code 
Filler 


WS-PART-MIN 
FILLER 
WS -PART -MAX 
WS-OPT 
FILLER 
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1 

- 

sO 

Filler 

s 

X 

— 

Report  Option  Code 

1 

X 

High  House  Inventory  Number 

SL 

- 

FILLER 

i 

X 

- 

Low  House  Inventory  Number 
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FIGURE  4.2  5 

INPUT  RECORD  FORMAT  FOR  FILE  RECORD  SELECT  CARD 


4.2.6  Vendor  Select  Card 


The  Vendor  Reference  File  can  be  accessed  and  the  contents  of  the 
Vendor  Name  records  listed  through  the  execution  of  the  Vendor  File  List 
program,  RP024,  described  in  Section  7.15.  The  user  may  select  a range 
of  vendor  codes  to  define  the  records  to  be  displayed;  otherwise,  the 
listing  will  display  all  vendors  up  to  vendor  code  10,000. 

The  user  selection  is  entered  by  means  of  one  Vendor  Select  Card. 
Figure  4.2-6  describes  the  format  of  this  record,  which  contains  the 


following  data  items: 

Character 

Data  Item 

COBOL 

Position 

Data  Item 

Field  Name 

1-5 

Low  vendor  code 

VEND-LOW 

6 

Filler 

FILLER 

7-11 

High  vendor  code 

VEND-HIGH 

12-80 

Filler 

FILLER 
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1 

sC 

FILLER 

1 

X 

HIGH  VENDOR  CODE 

& 

— 

FILLER 

I 

X 

LOW  VENDOR  CODE 
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FIGURE  4.2  6 

INPUT  RECORD  FORMAT  FOR  VENDOR  SELECT  CARD 


4.2.7  Vendor  File  Start-Up  Card 

The  initialization  of  the  Vendor  Reference  File  is  performed  through 
the  execution  of  a special  program.  This  program  is  the  Vendor  Reference 


File  Start-up  program,  VENDOl,  described  in  Section  7.24. 

The  input 

to  this  program 

consists  of  the  Vendor  File  Start-up  Card 

File.  Figure 

4.2-7  describes 

the  format  of  the  Vendor  Start-up  Card. 

This  record 

consists  of  the 

following  data  items: 

Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-5 

Vendor  code 

I-VENDOR-NO 

6-11 

Vendor  Start-up  date 

I-VENDOR-DATE 

12-51 

Vendor  name 

I-VENDOR-NAME 

52-80 

Filler 

FILLER 
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I 

- 

FILLER 

"o' 

«• 

X 

o 

•«3’ 

VENDOR  NAME 

• 

X 

nO 

VENDOR  STARTUP  DATE 

-§r 

s: 

- 

- 

VENDOR  CODE 
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FIGURE  4.2  7 

INPUT  RECORD  FORMAT  FOR  VENDOR  FILE  STARTUP  CARD 


4.3  Date  Cards 


Two  types  of  request  cards  are  input  to  the  Inventory  System.  They 


are: 

(a)  select  cards.  These  cards  are  input  to  the  system  to 

specify  user  selection  of  file  records  to  be  listed. 

They  are  described  in  Sections  4.2.4  through  4.2.6;  and 

(b)  date  cards.  A date  card  is  required  to  execute: 

(1)  each  program  that  generates  a monthly  report  or - 
an  on-demand  report; 

(2)  the  Reorder  Notification  Report  Generator  program, 

RPOll; 

(3)  the  Transaction  History  File  Update  program,  RPOOO; 

(4)  the  file  value  adjustment  programs,  INWADJ  and  INVCADJ; 
and 

(5)  the  programs  associated  with  the  performance  of  a 
physical  inventory  count.  These  programs  are  identified 
as  INVCOUNT,  INVQTY,  and  INVDIV. 
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Date  cards  are  not  required  for  the  generation  of  the  other  weekly 
reports,  for  the  execution  of  the  Price  Correction  Processor  program, 
for  the  execution  of  programs  that  list  file  records,  or  for  the  utility 
and  file  maintenance  programs. 

The  date  card,  described  in  Figure  4.3-1,  contains: 

(a)  the  request  code.  Table  4.3-1  lists  the  request  codes 
together  with  the  system  procedures  invoked  and  the 
programs  executed  through  submission  of  the  corresponding 
execute  cards; 

(b)  the  request  date  in  the  form,  'YYMMDD';  and 

(c)  the  report  options  for  the  Stock  Status  Report 
and  the  Low  Usage  Materials  Items  Report. 

The  user  may  elect  to  limit  the  information  displayed  on  either 
of  the  above  reports  by  specifying  a range  of  inventory  classes  in  the 
date  card.  This  override  feature  permits  the  user  to  generate  a report 
of  inventory  values  for  all  inventory  items  within  a class,  a range  of 
classes,  or  all  classes. 

The  user  may  also  elect  to  override  the  low  use  interval  from  the 
Inventory  Constants  File  by  specifying  it  in  the  date  card.  This  en- 
ables the  user  to  alter  the  content  of  the  Low  Usage  Materials  Items  Report 
without  formally  updating  the  constants  file. 
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■a 

— 

A 

o 

>o 

■ 

filler 

1 

X 

LOW  USAGE  INTERVAL 

90. 

- 

FILLER 

X 

HIGH  CLASS  CODE 

• 

A 

FILLER 

X 

- 

LOW  CLASS  CODE 

- 

:& 

— 

FIT.LER 

1 

X 

OPTION  CODE 

X 

>o 

a 

REPORT  REQUEST  DATE 

>• 

X 

REPORT  CODE 
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FIGURE  4.3  1 

INPUT  RECORD  FORMAT  FOR  DATE  CARD 


TABLE  4.3-1 


REPORT  REQUEST  CODES 


REPORT 

REQUEST  CODE 

REPORT  GENERATED  (A) 

PROCEDURE 

EXECUTED 

PROGRAM 

EXECUTED 

00  (B) 

(C) 

INVUOl- 
Step  INV07 

RPOOO 

11  (B) 

Reorder  Notification 
Followup  Reorder  Notifica- 
tion 

INVUOl 
Step  INVll 

RPOll 

13 

Unfilled  Purchase  Orders 

INVR13 

RP013 

14 

Vendor  Performance 

INVR14 

RP014 

17 

Stock  Status 

INVR17 

RP017 

18 

Low  Usage  Materials  Items 

INVR18 

RP018 

20 

Inventory  Activity  Report 
Inventory  Activity  Abstract 

INVR20 

RP020 

22 

Outstanding  Purchase  Orders 

INVR22 

RP022 

25 

(C) 

INVCOU 

INVCOUNT 

26 

(C) 

INVQTY 

INVQTY 

27 

Inventory  of  Division  Stock 

INVDIV 

INVDIV 

27 

(C) 

INWAL 

INWADJ 

28 

(C) 

INVCLS 

INVCADJ 

Notes:  (A)  All  programs  which  produce  reports,  except  RPOll  and  INVDIV, 

may  be  executed  as  part  of  the  regular  job,  ACTINVWK,  or 
on  a stand-alone  basis. 

(B)  Date  cards  containing  these  request  codes  must  be  Included 
in  the  job  deck  to  execute  the  regular  job,  ACTINVWK. 

(C)  These  request  codes  are  for  functions  other  than  report 
generation. 
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4.4  JCL  Cards 


Inventory  System  procedures  can  be: 

(a)  executed  in  stream,  or 

(b)  cataloged  in  a procedures  library  and  invoked  at  the:time 
of  system  execution. 

The  latter  method  was  used  in  the  implementation  of  the  system  at 
ACTD  and  DTS.  The  cataloged  procedures  are  illustrated  in  Section  5.0 
of  this  document.  The  JCL  input  consists  of  the  job  cards,  set-up  cards, 
and  message  cards  required  for  job  submission,  and  execute  (EXEC)  cards 
that  invoke  the  cataloged  procedures. 

The  regular  inventory  job,  ACTINVWK,  consists  of  the  submission  of 
transaction  data  for  processing  and  the  production  of  requested  reports. 
The  job  deck  for  this  run  consists  of: 

(a)  job  cards,  set-up  cards,  and  message  cards,  as  required  by 
the  computer  center; 

(b)  an  execute  card  to  invoke  procedure  INVDATE.  Under  this  pro- 
cedure, the  date  cards  are  processed,  creating  a file  of  re- 
port requests; 

(c)  a data  definition  card  to  indicate  the  presence  of  date  cards; 

(d)  the  date  cards  for  requested  reports,  which  must  include  cards 
containing  request  codes  '00'  and  'll'  (see  Section  4.3); 

(e)  an  execute  card  to  invoke  procedure  INVUOl,  which  processes 
the  input  transactions  and  generates  the  standard  reports 
automatically; 

(f)  a data  definition  card  to  indicate  the  presence  of  transaction 
cards ; 

(g)  the  transaction  cards;  and 

(h)  execute  cards  to  invoke  the  procedures  for  the  desired  extra 
reports.  For  each  execute  card,  a date  card  must  be  included 
in  the  run  deck. 
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For  procedures  INLIST,  INVR24,  and  INVRIO,  a data  definition  card  to 
signal  the  presence  of  program  control  cards  and  the  program  control 
cards  themselves  must  follow  the  execute  card  for  the  procedure. 

If  transaction  data  is  input  to  the  system  in  the  form  of  a magnetic 
tape  rather  than  on  cards,  steps  (f)  and  (g)  above  are  omitted. 

The  report  generator  programs  can  also  be  executed  on  a stand-alone 
basis.  The  appropriate  date  cards  and  execute  cards,  to  invoke  the  pro- 
cedures for  the  described  reports,  are  submitted.  The  job  set-up  follows 
steps  (a)  through  (d)  and  (h)  as  described  above,  except  that  the  cards 
containing  request  codes  '00*  and  'll'  are  omitted. 

The  JCL  input  for  the  execution  of  the  file  value  adjustment  pro- 
cedures INWAL  and  INVCLS  and  of  the  physical  inventory  count  procedures 
INVCOU,  INVQTY,  and  INVDIV,  is  basically  the  same  as  for  the  execution 
of  reports  on  a stand-alone  basis.  These  procedures  are  executed  as  indiv- 
idual stand-alone  jobs.  The  generalized  job  set-up  consists  of: 

(a)  Steps  (a)  through  (d)  as  described  above; 

(b)  an  execute  for  the  appropriate  special  procedure  to  be 
executed; 

(c)  in  the  case  of  INWAL  and  INVQTY,  an  execute  card  for  procedures 
INVUOl  is  Included.  Note  that  date  request  cards  for  codes  '00' 
and  'll'  must  be  Inclixled;  and 

(d)  if  procedure  INVUOl  is  executed,  a data  definition  override 
card  is  included  to  reference  the  output  from  procedures 
INWAL  and  INVQTY. 

The  JCL  necessary  to  the  execution  of  the  Purchase  Order  price 
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correction  procedure,  INVRPCOR,  consists  of: 

(a)  Steps  (a)  through  (d)  as  described  above.  Note  that  cards 
for  report  codes  '00'  and  'll'  must  be  Included; 

(b)  an  execute  (EXEC)  card  for  procedure  INVPRCOR; 

(c)  a data  definition  card  signaling  the  presence  of 
price  correction  input  cards; 

(d)  price  correction  input  cards;  and 

(e)  execute  cards  for  any  desired  extra  reports. 

This  price  correction  process  is  executed  as  a stand-alone  job,  on 
an  as-required  basis. 

Finally,  the  JCL  cards  necessary  to  the  execution  of  the  vendor 
reference  file  initialization  procedure  INVEND  consists  of: 

(a)  Job  cards,  set-up  cards,  and  message  cards,  as  required  by 
the  computer  center; 

(b)  an  execute  card  for  procedure  INVEND; 

(c)  a data  definition  card  signaling  the  presence 
of  vendor  file  start-up  cards;  and 

(d)  the  vendor  file  start-up  cards. 

This  job  is  run  once,  at  system  start-up,  on  a stand-alone  basis. 
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5.0  SYSTEM  PROCEDURES 


The  SIMS  Inventory  System  has  been  implemented  at  two  transit  prop- 
erties, Alameda-Contra  Costa  Transit  District  (ACTD)  and  Dallas  Transit 
System  (DTS) . In  each  application,  the  Inventory  System  is  installed  at 
and  executed  by  a service  bureau.  For  ACTD,  the  service  bureau  is  Optimum 
Systems  Inc.,  in  Santa  Clara,  California.  For  DTS,  the  service  bureau  is 
the  municipal  computer  center. 

The  Inventory  Master  File  and  the  Transaction  History  File  are  on 
magnetic  tape.  Other  Inventory  System  files  and  program  libraries  reside 
on  a private  disk  pack,  ACTINV.  Procedures  for  executing  the  system  are 
cataloged  in  the  service  bureau's  procedure  library.  These  procedures 
are  invoked  by  user-supplied  Job  Control  Language  (JCL)  cards. 

The  execution  of  the  Inventory  System  is  described  in  terms  of  jobs^ 
which,  in  turn,  are  broken  down  into  the  cataloged  procedures  that  con- 
stitute each  job.  Each  procedure  is  described  in  this  section  by  a flow- 
chart and  a procedure  specification.  The  latter  consists  of  the  following 
items ; 


Procedure  Name: 
Program  Executed: 
Functions : 

Procedure  Flowchart: 
Files : 


the  name  specified  in  the  execute  card  in- 
cluded in  the  job  deck 

the  identification  and  the  name  of  the  pro- 
gram executed  under  the  procedure 

the  basic  purpose  of  the  programs  is  briefly 
described 

a reference  to  the  associated  flowchart 

both  input  and  output  files  associated  with 
the  procedure,  identified  by  file  name  and 
data  set  name.  A reference  to  the  section 
describing  each  file  is  provided. 

reports  generated  by  the  program 
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Reports: 


The  procedures  comprising  the  regular  Inventory  System  job,  ACTINVWK, 
are  described  in  Section  5.1.  These  procedures  include  those  invoked 
to  generate  the  monthly  or  on-demand  reports.  Several  procedures  have 
been  provided  to  perform  specialized  tasks  outside  of  the  regular  jobs. 
These  are  detailed  in  Section  5.2. 

Listings  of  cataloged  procedures  are  provided  in  Section  5.3. 

These  listings  are  illustrative  only.  With  the  exception  of  INVBKUP, 
the  listings  show  procedures  as  installed  at  ACTD.  The  listing  of  the 
procedure  INVBKUP  is  as  installed  at  DTS;  the  comparable  procedure  at 
ACTD  is  a standard  operating  procedure  of  the  service  bureau. 

Although  the  Inventory  System  procedures  are  basically  the  same  at 
both  properties,  there  are  certain  differences  between  the  procedures 
as  used  at  the  two  properties.  These  differences  are  the  result  of: 

(a)  output  requirements  of  each  property, 

(b)  the  method  of  data  submission, 

(c)  variation  in  the  operating  procedures  of  the  computer  centers, 

(d)  variation  in  the  computer  center  billing  algorithm, 

(e)  program  region  size  availability,  and 

(f)  ^differences  in  the  computer' hardware. 
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5. 1 Basic  Inventory  System  Job  - ACTINVWK 


The  basic  job,  ACTINVWK,  is  normally  executed  weekly.  It  updates 
the  Inventory  Master  File  and  the  Transaction  History  File  and  produces 
standard  user  reports  and  edit  reports  of  input  transactions.  Optionally, 
the  user  may  request  on-demand  reports  through  the  execution  of  cataloged 
procedures.  The  majority  of  these  on-demand  reports  are  requested  monthly. 
The  extra  reports  may  be  included  in  the  regular  weekly  job  run  or  may 
be  generated  on  a stand-alone  basis. 

Table  5.1-0  lists  the  cataloged  procedures  associated  with  the 
basic  job  ACTINVWK.  This  table  also  defines  an  order  in  which  the 
procedures  are  executed.  The  job  stream  necessitates  the  execution  of 
procedures  INVDATE  and  INVUOl  in  the  order  shown.  The  remaining  pro- 
cedures generate  on-demand  reports.  These  procedures  do  not  have  to  be 
executed  during  the  weekly  run.  Any  combination  of  these  procedures  may 
be  run,  depending  on  the  user's  requests.  The  on-demand  reports  are  not 
dependent  on  each  other  and  so  failure  to  execute  one  will  not  affect 
execution  of  the  others. 

Within  the  procedure  INVUOl,  three  sub-procedures  are  optional  and 
may  be  omitted  from  the  cataloged  procedure.  They  are: 

(a)  INVOl  - This  sub-procedure  executes  the  User  Input  Processor 
program,  DA200.  If  the  user  submits  transactioiis  in  the 
standard  SIMS  Inventory  formats,  this  step  is  unnecessary; 

(b)  INV17  - This  sub-procedure  executes  the  Receiving  Report  gen- 
eration program.  If  the  user  output  requirements  do  not  in- 
clude the  Receiving  Report,  this  step  is  unnecessary;  and 

(c)  INV19  - This  sub-procedure  executes  the  Division  Stock  Replace- 
ment Report  generator  program.  If  the  user  output  requirements 
do  not  include  this  report,  this  step  is  unnecessary. 
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TABLE  5.1-0 


ACTINVWK  PROCEDURES 


Order  of 
Procedure 

Procedure 

Execution 

N«ae 

ProKram(s) 

Description 

1 

INVDATE 

lEBGENER 

Creates  Report  Date  File 

2 

INVUOl-INVOl 

DA200 

Reformats  and  edits  trans- 

-INV03 

DA300 

actions,  updates  Inventory 

-INV05 

DG300 

Master  and  Transaction  His- 

-INV07 

RPOOO 

tory  files,  and  produces 

-INVll 

RPOll 

weekly  reports 

-INV13 

RPOlOe 

-INV17 

RP060 

-INV19 

RP016 

3 

INVR13 

RP013 

Generates  Unfilled  Purchase 
Orders  Report 

4 

INVR14 

RP014 

Generates  Vendor  Performance 
Report 

5 

INVR17 

RP017 

Generates  Stock  Status 
Report 

6 

INVR20 

RP020 

Generates  Inventory  Activity 
Report  and  Inventory  Activity 
Abstract 

7 

INVR18 

RP018 

Generates  Low  Usage 
Materials  Items  Report 

8 

INVR22 

RP022 

Generates  Outstanding  Purchase 
Orders  Report 

9 

INVRIO 

RPOIOD 

Generates  Requested  Materials 
Transaction  History  Report 
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TABLE  5.1-1 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVDATE 
PROGRAM  EXECUTED;  lEBGENER 
FUNCTIONS;  To  create  Report  Date  File 
PROCEDURE  FLOWCHART;  Figure  5.1-1 
FILES; 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF 


INPUT 


Inventory  Control  File 
Report  Date  Card  File 


S.CTL(INVDTEOl) 

DATECD 


6.12 

6.15 


OUTPUT 


Report  Date  File 


S.DATE 


6.14 


REPORTS 


None 
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FIGURE  5.1-1 
PROCEDURE INVDATE 
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TABLE  5.1-2 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVUOl  - INVOl 
PROGRAM  EXECUTED;  DA200 

FUNCTIONS;  To  convert  user  input  records  to  standard  SIMS  formats 
PROCEDURE  FLOWCHART;  Figure  5.1-2 
FILES; 

FILE  NAME 

INPUT; 

ACTD  Card  Input  File 
OUTPUT; 

Standard  Transaction  File  &INVTRN  6.4 

REPORTS ; 

Invalid  Item  Numbers 

Note;  Report  is  generated  to  meet  specific  output  requirement 
of  ACTD. 


DATA  SET  NAME  SEC.  REF. 


TRANCD  6.16 
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/= 

TRANCD 


FIGURE  5.1-2 

PROCEDURE  INVU01-INV01 
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TABLE  5.1-3 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOI  - INV03 
PROGRAM  EXECUTED;  DA300 

FUNCTIONS;  To  edit  transaction  codes,  update  the  Inventory  Constants 

and  Vendor  Reference  files,  and  add  a sort  key  to  transaction 
records  and  sort  them. 

PROCEDURE  FLOWCHART;  Figure  5.1-3 

FILES; 


FILE  NAME 

DATA  SET  NAME 

SEC.  REF, 

INPUT; 

Standard  Transaction  File 

&INVTRN 

6.4 

Suspense  File 

SUSPFILE(O) 

6.9 

Inventory  Constants  File 

S. CONST 

6.11 

Vendor  Reference  File 

M. VENDOR 

6.13 

OUTPUT; 

Temporary  Storage  Transaction  M.SRTEMP  6.5 

File 


REPORTS; 

Invalid  Transactions 
Constants  File  Update 
Vendor  Reference  File  Update 
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FIGURE  5.1-3 

PROCEDURE  INVU01-INV03 
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TABLE  5.1-4 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOl  - INV05 
PROGRAM  EXECUTED;  DG300 

FUNCTIONS;  To  edit  daily  transactions;  update  the  Inventory  Master 
and  the  Inventory  Class  Master  files;  and  to  create  the 
Inventory  Active  Master,  Current  Transaction,  Purchase 
Order  Transaction,  and  Temporary  Suspense  Files. 

PROCEDURE  FLOWCHART;  Figure  5.1-4 

FILES; 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 


INPUT; 


Inventory  Master  File 

M.  INVENT (0) 

6.1 

Inventory  Class  Master  File 

M.INVCLASS(O) 

6.2 

Temporary  Storage  Transaction 

M.SRTEMP 

6.5 

File 

Inventory  Constants  File 

S. CONST 

6.11 

OUTPUT; 

Inventory  Master  File 

M. INVENT (+1) 

6.1 

Inventory  Class  Master  File 

M.INVCLASS(+1) 

6.2 

Inventory  Active  Master  File 

M. INVACTV 

6.3 

Current  Transaction  File 

M.TRANDISK(+1) 

6.6 

Temporary  Suspense  File 

M.INVSUSPN 

6.6 

Purchase  Order  Transaction 

M.POTRANS 

6.10 

File 


REPORTS ; 

Inventory  Transaction  Edit 
Inventory  Suspense  File  Contents 
Purged  Items  and  Open  Purchase  Orders 
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FIGURE  5.1-4 

PROCEDURE  INVU01-INVC® 
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TABLE  5.1-5 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOl  - INV07 
PROGRAM  EXECUTED;  RPOOO 

FUNCTIONS;  To  update  the  Transaction  History  File. 

PROCEDURE  FLOWCHART:  Figure  5.1-5 

FILES: 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF 


INPUT: 


Current  Transaction  File 
Transaction  History  File 


M.TRANDISK(+1) 

M.TRANTAPE(O) 


6.6 

6.7 


OUTPUT 


Transaction  History  File 


M.TRANTAPE(+1) 


6.7 


REPORTS : 


None 
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FIGURE  5.1-5 

PROCEDURE  INVU01-INV07 
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TABLE  5.1-6 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOl  - INVll 
PROGRAM  EXECUTED:  RPOll 

FUNCTIONS;  To  create  reorder  status  records,  generate  the 
Reorder  Notification  reports,  and  create  the 
Suspense  File. 

PROCEDURE  FLOWCHART:  Figure  5.1-6 

FILES: 


FILE  NAME 

DATA  SET  NAME 

SEC.  REF 

INPUT; 

Inventory  Active  Master  File 

M.INVACTV 

6.3 

Temporary  Suspense  File 

M. INVSUSPN 

6.8 

Inventory  Constants  File 

S. CONST 

6.11 

Report  Date  File 

S . DATE 

6.14 

OUTPUT; 

Suspense  File  SUSPFILE(+1)  6.9 

REPORTS; 

Reorder  Notification 
Followup  Reorder  Notification 
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FIGURE  5.1-6 

PROCEDURE  INVU01-INV11 


5-16 


TABLE  5.1-7 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOl  - INV13 
PROGRAM  EXECUTED;  RPOIOC 

FUNCTIONS:  To  generate  the  Materials  Transaction  History 

report  of  current  transactions. 

PROCEDURE  FLOWCHART;  Figure  5.1-7 

FILES: 


FILE  NAME 


DATA  SET  NAME 


INPUT: 


Inventory  Active  Master  File  M.INVACTV 

Current  Transaction  File  M. TRANDISK(+1) 


SEC.  REF. 


6.3 

6.6 


OUTPUT: 


None 


REPORTS: 


Materials  Transaction  History 
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(^ACTINV^ 

M.TRANDISK 

(+1) 

KrUlOC 

M.  INVACTV 

FIGURE  5.1-7 

PROCEDURE  INVU01-INV13 


MATERIALS 
^ TRANSACTION 
HISTORY 
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TABLE  5.1-8 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOl  - INV15 
PROGRAM  EXECUTED;  RP060 

FUNCTIONS ; To  generate  the  Receiving  Reports 

PROCEDURE  FLOWCHART;  Figure  5.1-8 

FILES: 


FILE  NAME 


DATA  SET  NAME  SEC.  REF. 


INPUT: 

Purchase  Order  Transaction  File  M.POTRANS  6.10 

Vendor  Reference  File  M. VENDOR  6.13 


OUTPUT: 

None 


REPORTS : 

Receiving  Report 

Amendment  to  Receiving  Report 
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FIGURE  5.1-8 

PROCEDURE  INVU0MNV15 
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TABLE  5.1-9 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVUOl  - INV19 
PROGRAM  EXECUTED;  RP016 

FUNCTIONS;  To  generate  the  Division  Stock  Replacement  Report 

PROCEDURE  FLOWCHART;  Figure  5.1-9 

FILES; 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF 


INPUT; 


Inventory  Active  Master  File 
Current  Transaction  File 


M.  INVACTV 
M.TRANDISK(+1) 


6.3 

6.6 


OUTPUT 


None 


REPORTS ; 


Division  Stock  Replacement 
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FIGURE  5.1-9 

PROCEDURE  INVU01-INV19 


DIVISION 


STOCK 

REPLACEMENT 
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TABLE  5.1-10 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVR13 
PROGRAM  EXECUTED;  RP013 

FUNCTIONS;  To  generate  the  Unfilled  Purchase  Orders  Report 

PROCEDURE  FLOWCHART;  Figure  5.1-10 

FILES; 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF. 


INPUT; 


Inventory  Master  File 
Inventory  Constants  File 
Report  Date  File 


M. INVENT ( ) 
S. CON ST 
S.DATE 


6.1 

6.11 

6.14 


OUTPUT; 


None 


REPORTS: 


Unfilled  Purchase  Orders  Report 
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FIGURE  5.1-10 
PROCEDURE INVR13 
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TABLE  5.1-11 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME:  INVR22 

PROGRAM  EXECUTED;  RP022 

FUNCTIONS;  To  generate  the  Outstanding  Purchase  Orders 
Report. 

PROCEDURE  FLOWCHART;  Figure  5.1-11 
FILES; 


FILE  NAME  DATA  SEI  NAME  SEC.  REF. 

INPUT; 


Inventory  Master  File 

M.  INVENT ( ) 

6.1 

Inventory  Constants  File 

S. CON ST 

6.11 

Vendor  Reference  File 

M. VENDOR 

6.13 

Report  Date  File 

S.DAIE 

6.14 

OUTPUT; 

None 

REPORTS; 


Outstanding  Purchase  Orders 
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FIGURE  5.1-11 
PROCEDURE  INVR22 
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TABLE  5.1-12 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVR14 
PROGRAM  EXECUTED;  RP014 

— generate  the  Vendor  Performance  Report 

PROCEDURE  FLOWCHART:  Figure  5.1-12 

FILES: 


SEC.  REF. 

6.1 

6.13 

6.14 

OUTPUT: 

None 

REPORTS : 


FILE  NAME 


DATA  SET  NAME 


INPUT: 


Inventory  Master  File 
Vendor  Reference  File 
Report  Date  File 


M. INVENT ( ) 
M. VENDOR 
S . DATE 


Vendor  Performance  Report 
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PROCEDURE INVR14 
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TABLE  5.1-13 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVR17 
PROGRAM  EXECUTED;  RP017 

FUNCTIONS;  To  generate  the  Stock  Status  Report 

PROCEDURE  FLOWCHART;  Figure  5.1-13 

FILES; 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF 


INPUT; 


Inventory  Master  File 
Report  Date  File 


M. INVENT ( 
S . DATE 


6.1 

6.14 


OUTPUT; 


None 


REPORTS ; 


Stock  Status  Report 
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FIGURE  5.1-13 
PROCEDURE INVR17 
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TABLE  5.1-14 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVR20 
PROGRAM  EXECUTED;  RP020 

FUNCTIONS;  To  generate  the  Inventory  Activity  Report  and 
the  Inventory  Activity  Abstract 

PROCEDURE  FLOWCHART;  Figure  5.1-14 

FILES; 


FILE  NAME 


INPUT; 


Inventory  Class  Master  File 
Inventory  Constants  File 
Report  Date  File 


DATA  SET  NAME 


SEC.  REF. 


M.INVCLASS(  ) 
S. CONST 
S.DATE 


6.2 

6.11 

6.14 


OUTPUT; 


None 


REPORTS; 

Inventory  Activity  Report 
Inventory  Activity  Abstract 
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FIGURE  5.1-14 
PROCEDURE INVR20 
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TABLE  5.1-15 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVR18 
PROGRAM  EXECUTED;  RP018 

FUNCTIONS:  To  generate  the  Low  Usage  Materials  Items  Report 

PROCEDURE  FLOWCHART;  Figure  5.1-15 

FILES: 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF 


INPUT: 


Inventory  Master  File 
Inventory  Constants  File 
Report  Date  File 


M.,  INVENT  ( ) 
S. CONST 
S.DATE 


6.1 

6.11 

6.14 


OUTPUT: 


None 


REPORTS: 


Low  Usage  Materials  Items 
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FIGURE  5.1-15 
PROCEDURE INVR18 
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TABLE  5.1-16 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVRIO 
PROGRAM  EXECUTED:  RPOIOD 

FUNCTIONS;  To  generate  Materials  Transaction  History  Report, 
as  specified  by  the  user,  for  selected  items 

PROCEDURE  FLOWCHART;  Figure  5.1-16 

FILES; 


FILE  NAME 


DATA  SET  NAME  SEC.  REF. 


INPUT; 

Inventory  Master  File  M. INVENT ( ) 6.1 

Transaction  History  File  M.TRANTAPE(  ) 6.7 

Part  History  Select  Card  File  SYSIN  6.18 


OUTPUT; 


None 
REPORTS ; 


Materials  Transaction  History 
Part  Select  Card  Edit  Errors 
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FIGURE  5.1-16 
PROCEDURE INVR10 


MATERIALS 
^ TRANSACTION 
HISTORY 


PART  SELECT 
^ CARD 

EDIT  ERRORS 
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5. 2 Other  Inventory  System  Procedures 


In  addition  to  the  procedures  included  in  the  job  ACTINVWK,  there 
are  several  procedures  used  for  special  purposes.  Most  of  these  pro- 
cedures are  for  the  execution  of  special-purpose  programs.  The  procedures 
may  be  classed  in  terms  of  these  special  purposes: 

(a)  generation  of  file  listings; 

(b)  correction  of  master  file  and  transaction  records, 
necessitated  by  a Purchase  Order  price  change; 

(c)  reconciliation  of  master  file  records; 

(d)  performance  of  physical  inventory- taking; 

(e)  initiation  of  the  Vendor  Reference  ISAM  file; 

(f)  copying  of  files  to  provide  restart  ca.pability;  and 

(g)  generation  of  reports  normally  generated  automatically. 
References  are  made  in  the  following  subsections  to  the  tables 

and  figures  that  describe  the  procedures. 

5.2.1  Generation  of  File  Listings 

Two  procedures  enable  the  user  to  print  file  records  on  a selec- 
tive basis.  This  capability  is  available  so  that  the  user  may: 

(a)  verify  that  the  contents  of  file  records  are  correct;  and 

(b)  have  available  information  that  may  assist  in  the  analysis 
of  data  problems. 
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The  two  procedures  are: 

(a)  Inventory  Master  File  list  procedure,  INLIST.  This  pro- 
cedure is  described  in  Table  5.2-1  and  Figure  5.2-1.  It 
executes  the  file  list  program,  INVLST,  described  in 
Section  7.17.  The  program  enables  the  user  to  print  from 
the  Inventory  Master  File  specified  records  for  selected 
items;  and 

(b)  Vendor  File  list  procedure,  INVR24.  This  procedure  is 
described  in  Table  5.2-2  and  Figure  5.2-2.  It  executes 
the  file  list  program,  RP024,  which  is  described  in 
Section  7.15.  This  program  enables  the  user  to  print 
selected  Vendor  Name  records  from  the  Vendor  Reference 
File. 

5.2.2  Purchase  Order  Price  Correction  Procedure 


The  Purchase  Order  Price  Correction  procedure,  INVPRCOR,  is 
executed  as  a stand-alone  job.  The  procedure  contains  several  sub- 
procedures . They  are : 

(a)  INVPROl,  described  in  Table  5.2-3  and  Figure  5.2-3.  This 
procedure  is  for  the  execution  of  the  Price  Correction 
Processor  program,  DA250.  This  special-purpose  program 
is  described  in  Section  7.18.  The  program  enables  the 
user  to  change  a Purchase  Order  price  after  a materials 
receipt  record  has  been  processed  and  to  correct  file 
records  and  transaction  records.  The  specific  program 
function  is  to  create  the  transaction  file  necessary  for 
this  purpose. 

(b)  INVPR05,  described  in  Table  5.2-4  and  Figure  5.2-4.  This 
procedure  is  for  the  execution  of  the  Inventory  Master 
Edlt/Update  program,  DG300.  The  transaction  file  created 
under  the  procedure  INVPROl  is  processed  to  correct  the 
Inventory  Master  File  and  the  Inventory  Class  Master  File. 

(c)  INVPR07,  described  in  Table  5.2-5  and  Figure  5.2-5  This 
procedure  is  for  the  execution  of  the  Transaction  History 
File  Update  program,  RPOOO.  The  transactions  processed 
are  added  to  the  Transaction  History  File. 

(d)  INVPR13,  described  in  Table  5.2-6  and  Figure  5.2-6.  This 
procedure  is  for  the  execution  of  the  Materials  Transaction 
History  Report  Generator  program,  RPOIOC.  The  report 
fentrated  permits  the  user  to  monitor  the  corrections  made. 
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TABLE  5.2-1 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INLIST 
PROGRAM  EXECUTED;  INVEST 

FUNCTIONS ; To  generate  a listing  of  requested  Inventory  Master 
File  records. 

PROCEDURE  FLOWCHART;  Figure  5.2-1 
FILES : 


FILE  NAME  DATA  SET  NAME 

INPUT; 

Inventory  Master  File  M. INVENT  ( ) 

File  Records  Select  Card  File  SYSIN 


OUTPUT; 

None 


REPORTS ; 


SEC.  REF. 


6.1 

6.19 


Inventory  Master  File  List 
Selection  Card  Edit  List 


FIGURE  5.2-1 
PROCEDURE  INLIST 
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TABLE  5.2-2 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVR24 
PROGRAM  EXECUTED;  RP024 

FUNCTIONS;  To  generate  a listing  of  requested  Vendor  Name  records. 
PROCEDURE  FLOWCHART;  Figure  5.2-2 
FILES ; 


FILE  NAME 


DATE  SET  NAME 


SEC.  REF 


INPUT 


Vendor  Reference  File 
Vendor  Select  Card  File 


M. VENDOR 
SYSIN 


6.13 

6.20 


OUTPUT 


None 


REPORTS 


Vendor  File 


FIGURE  5.2-2 
PROCEDURE INVR24 
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TABLE  5.2-3 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVPRCOR  - INVPROl 
PROGRAM  EXECUTED;  DA250 

FUNCTIONS:  To  process  Purchase  Order  price  correction  transactions, 

extract  all  transactions  affected  by  the  correction 
transactions,  and  create  equivalent  reversing  transactions. 

PROCEDURE  FLOWCHART:  Figure  5.2-3 

FILES : 


FILE  NAME 


DATA  SET  NAME  SEC.  REF. 


INPUT: 

Transaction  History  File  M.TRANTAPE(O)  6.7 

Price  Correction  Card  File  PCTRAN  6.21 


OUTPUT : 

Temporary  Storage  Transaction  M.SRTEMP  6.5 

File 

REPORTS: 


Price  Correction  Edit  List 
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FIGURE  5.2-3 

PROCEDURE  INVPRCOR-1NVPR01 
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TABLE  5.2-4 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVPRCOR  - INVPR05 
PROGRAM  EXECUTED;  DG300 

FUNCTIONS;  To  edit  transactions  that  are  output  from  the  Price 

Correction  Processor  program  DA250;  update  the  Inven- 
tory Master  and  the  Inventory  Class  Master  files;  and 
create  the  Inventory  Active,  Current  Transaction, 

Purchase  Order  Transaction,  and  Temporary  Suspense  files. 

PROCEDURE  FLOWCHART;  Figure  5.2-4 

FILES; 


FILE  NAME 

DATA  SET  NAME 

SEC.  REF. 

INPUT; 

Inventory  Master  File 

M. INVENT (0) 

6.1 

Inventory  Class  Master  File 
Temporary  Storage  Trans- 

M.INVCLASS(O) 

6.2 

action  File 

M. SRTEMP 

6.5 

Inventory  Constants  File 

S. CONST 

6.11 

OUTPUT ; 

Inventory  Master  File 

M. INVENT (+1) 

6.1 

Inventory  Class  Master  File 

M.INVCLASS(+1) 

6.2 

Inventory  Active  Master  File 

M.INVACTV 

6.3 

Current  Transaction  File 

M.TRANDISK(+1) 

6.6 

Temporary  Suspense  File 
Purchase  Order  Transaction 

M.INVSUSPN 

6.8 

File 

M.POTRANS 

6.10 

I 

I REPORTS; 

I 

Inventory  Transaction  Edit 
Inventory  Suspense  File  Contents 
Purged  Items  and  Open  Purchase  Orders 


i 
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FIGURE  5.2-4 

PROCEDURE  INVPRCOR-INVPR05 


1 


INVENTORY 
SUSPENSE  FILE 
CONTENTS 
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TABLE  5.2-5 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVPRCOR  - INVPR07 
PROGRAM  EXECUTED;  RPOOO 

FUNCTIONS;  To  update  the  Transaction  History  File,  using  the  trans- 
actions that  are  output  from  the  Price  Correction 
Processor  program  DA250. 

PROCEDURE  FLOWCHART;  Figure  5.2-5. 

FILES; 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF. 


INPUT! 


Current  Transaction  File 
Transaction  History  File 


M.TRANDISK(+1) 

M.TRANTAPE(O) 


6.6 

6.7 


OUTPUT; 


Transaction  History  File  M.TRANTAPE(+1) 


6.7 


REPORTS ; 
None 
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FIGURE  5.2-5 

PROCEDURE  INVPRCOR-INVPR07 
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TABLE  5.2-6 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVPRCOR  - INVPR13 
PROGRAM  EXECUTED:  RPOIOC 

FUNCTIONS ; To  generate  the  Materials  Transaction  History  report  of 
transactions  that  are  output  from  the  Price  Correction 
Processor  program  DA250. 

PROCEDURE  FLOWCHART;  Figure  5.2-6 

FILES: 


FILE  NAME 

INPUT: 


DATA  SET  NAME 


Inventory  Active  Master  File  M.INVACTV 

Current  Transaction  File  M.TRANDISK(+1) 


SEC.  REF. 


6.3 

6.6 


OUTPUT : 
None 


REPORTS: 

Materials  Transaction  History 
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FIGURE  5.2-6 

PROCEDURE  INVPRCOR-INVPR13 


MATERIALS 

TRANSACTION 

HISTORY 
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5.2.3  Reconciliation  of  File  Records 


Two  procedures  enable  the  user  to  reconcile  certain  file  records 
so  that  they  are  consistent.  These  procedures  are: 

(a)  Inventory  Value  Adjustment  procedure,  INWAL.  This  proce- 
dure is  described  in  Table  5.2-7  and  Figure  5.2-7.  It 
executes  the  Inventory  Value  Adjustment  program  INWADJ, 
described  in  Section  7.19.  The  program  enables  the  user 
to  adjust  the  Monthly  Activity  records  in  the  Inventory 
Master  File  so  that  the  value  reflected  in  those  records 
is  consistent  with  the  quantity  and  average  price  data  in 
the  Stock  Status  record.  Program  output  consists  of  a 
temporary  data  set,  &VALADJ,  which  contains  value  adjust- 
ment transactions.  Execution  of  the  procedure  INWAL 
must  be  followed  by  execution  of  the  procedure  INVUOl 
(see  Section  5.1)  in  the  same  job  stream.  Execution  of 
this  procedure  processes  the  value  adjustment  transactions, 
updates  the  Transaction  History  File,  and  generates  the 
transaction  report.  The  user  may  also  elect  to  execute 
the  procedure  INVR20,  to  generate  the  Inventory  Activity 
Report,  so  that  the  results  of  the  adjustments  are  dis- 
played in  summary  form;  and 

(b)  Inventory  Class  Master  File  Adjustment  procedure,  INVCLS. 
This  procedure  is  described  in  Table  5.2-8  and  Figure  5.2-8. 
It  executes  the  Inventory  Class  Master  File  Adjustment  pro- 
gram INVCADJ,  described  in  Section  7.20.  The  purpose  of 
this  program  is  to  ensure  that  inventory  values  reflected 

in  the  Inventory  Master  File  and  the  Inventory  Class  Master 
File  are  consistent.  In  contrast  to  the  procedure  INWAL, 
no  other  procedure  need  be  executed.  The  user  may  elect 
to  execute  INVR20  to  generate  the  Inventory  Activity  Report, 
as  above. 

5.2.4  Physical  Inventory 

Three  procedures  have  been  provided  to  assist  the  user  to  prepare 
for  and  to  process  the  results  of  a physical  inventory  count.  These 
procedures  are: 

(a)  Inventory  Count  Procedure,  INVCOU.  This  procedure  is 

described  in  Table  5.2-9  and  Figure  5.2-9.  It  executes  the 
Inventory  Master  Card  Generator  program,  INVCOUNT,  described 
in  Section  7.21.  The  program  function  is  to  produce  a 
punched  card  for  each  inventory  item  at  each  store's  loca- 
tion as  recorded  in  the  Inventory  Master  File.  The  cards 
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TABLE  5.2-7 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INWAL 
PROGRAM  EXECUTED;  INWADJ 

FUNCTIONS ; To  compute  the  value  of  each  Inventory  item  from  data 
stored  in  the  Stock  Status  record  and  in  the  Monthly 
Activity  records  of  the  Inventory  Master  File,  compare 
the  results,  create  necessary  value  adjustment  trans- 
actions, and  store  them  in  a temporary  data  set. 

PROCEDURE  FLOWCHART;  Figure  5.2-7 

FILES: 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT; 

Inventory  Master  File  M. INVENT (0)  6.1 

Report  Date  File  S.DATE  6.1A 

OUTPUT; 

Value  Adjustment  Transaction  iVALADJ  6.26 

File 

REPORTS ; 


None 
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FIGURE  5.2-7 
PROCEDURE INVVAL 
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TABLE  5.2-8 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVCLS 
PROGRAM  EXECUTED;  INVCADJ 

FUNCTIONS;  To  compare  the  values  of  inventory  items  reflected  in  the 
Monthly  Activity  records  in  the  Inventory  Master  File  and 
the  Inventory  Class  Master  File  and  adjust  the  records 
in  the  latter  file  so  that  they  are  consistent  with  the 
Inventory  Master  File  records. 

PROCEDURE  FLOWCHART;  Figure  5.2-8 

FILES; 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 


INPUT; 


Inventory  Master  File 

M. INVENT (0) 

6.1 

Inventory  Class  Master 
File 

M.INVCLASS(O) 

6.2 

Report  Date  File 

S.DATE 

6.14 

OUTPUT ; 

Inventory  Class  Master  File 

M. INVCLASS (+1) 

6.2 

REPORTS ; 
None 
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FIGURE  5.2-8 
PROCEDURE INVCLS 
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TABLE  5.2-9 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  INVCOU 
PROGRAM  EXECUTED;  INVCOUNT 

FUNCTIONS;  To  generate  Inventory  Master  cards  for  each  inventory 
item  on  file. 

PROCEDURE  FLOWCHART;  Figure  5.2-9 
FILES; 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT; 

Inventory  Master  File  M. INVENT ( ) 6.1 

Report  Date  File  S.DATE  6.14 


OUTPUT ; 


Inventory  Master  Card  File  SYSOUT=B 


6.22 


REPORTS ; 
None 
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FIGURE  5.2-9 
PROCEDURE INVCOU 
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are  used  as  source  documents  to  record  the  physical  quanti- 
ties counted  during  inventory- taking.  The  procedure  may 
be  executed  on  a stand-alone  basis  or  in  conjunction  with 
INVR17,  to  generate  a Stock  Status  Report. 

(b)  Inventory  Quantity  Adjustment  Procedure,  INVQTY.  This 
procedure  is  described  in  Table  5.2-10  and  Figure  5.2-10. 

It  executes  the  Inventory  Quantity  Adjustment  program 
INVQTY,  which  is  described  in  Section  7.22.  The  purpose 
of  the  program  is  to  create  the  quantity  adjustment  trans- 
actions required  to  reconcile  the  inventory  file  records  with 
the  physical  count.  Program  output  consists  of  a temporary 
data  set,  &QTYADJ.  Execution  of  the  procedure  INVQTY  must 

be  followed  by  execution  of  the  procedure  INVUOl  (see 
Section  5.1)  in  the  same  job  stream.  Execution  of  this 
procedure  processes  the  quantity  adjustment  transactions, 
updates  the  Transaction  History  File,  and  generates  the 
transaction  report.  The  user  may  also  elect  to  execute 
the  procedure  INVR20  to  generate  the  Inventory  Activity 
Report. 

(c)  Division  Stock  Reconciliation  procedure,  INVDIV.  This  pro- 
cedure is  described  in  Table  5.2-11  and  Figure  5.2-11.  It 
executes  the  Division  Stock  Reconciliation  program  INVDIV, 
described  in  Section  7.23.  The  purpose  of  this  program  is 
to  compare  physical  count  data  with  the  file  records  of 
stock  levels  at  ancillary  storerooms  located  at  the  divisions. 
Program  output  consists  of  a report.  Inventory  of  Division 
Stock,  rather  than  quantity  adjustment  transactions.  In- 
ventory quantity  data  for  the  division  are  included  in  the 
trainsactions  processed  by  the  program  INVQTY.  The  generation 
of  a report  assists  the  user  to  determine  the  degree  of  re- 
counting of  the  divisional  inventories  necessary. 

5.2.5  Initiation  of  Vendor  Reference  File 

As  the  Vendor  Reference  File  is  an  indexed  sequential  (ISAM)  file, 
initial  input  must  be  processed  by  means  of  a special  procedure.  The 
Vendor  Reference  File  Initiation  procedure,  INVEND,  consists  of  two 
sub-procedures.  They  are: 

(a)  VENDl,  described  in  Table  5.2-12  and  Figure  5.2-12.  This 

procedure  executes  the  Vendor  Reference  File  Start-Up  program, 
VENDOl,  described  in  Section  7.24.  The  purpose  of  the  program 
is  to  put  the  initial  vendor  data  base  on  file;  and 
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TABLE  5.2-10 
PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVQTY 
PROGRAM  EXECUTED;  INVQTY 


FUNCTIONS;  Td  compare  physical  inventory  count  data  with  Inventory 
Master  File  records,  create  necessary  quantity  adjust- 
ment transactions,  and  store  them  in  a temporary  data 
set. 

PROCEDURE  FLOWCHART;  Figure  5.2-10 
FILES; 


FILE  NAME 


DATA  SET  NAME 


SEC.  REF. 


INPUT; 


Inventory  Master  File  M. INVENT ( ) 

Report  Date  File  S.DATE 

Quantity  Adjustment  Card  File  ADJCD 


6.1 

6.14 

6.23 


OUTPUT i 


Quantity  Adjustment  Trans- 
action File  &QTYADJ 


6.25 


REPORTS ; 

Inventory  Quantity  Edit  List 
Missing  Cards  List 
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PROCEDURE INVQTY 


5-60 


TABLE  5.2-11 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVDIV 
PROGRAM  EXECUTED;  INVDIV 

FUNCTIONS;  To  compare  divisional  physical  inventory  count  data  with 
Inventory  Master  File  records. 

PROCEDURE  FLOWCHART;  Figure  5.2-11 

FILES; 


FILE  NAME 

INPUT; 

Inventory  Master  File 
Report  Date  File 
Division  Stock  Reconciliation 
Card  File 


DATA  SET  NAME 

SEC.  REF 

M. INVENT ( ) 

6.1 

S.DATE 

6.14 

DIVCD 

6.24 

OUTPUT; 

None 


REPORTS; 

Inventory  of  Division  Stock 
Division  Inventory  Quantity  Edit  List 
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FIGURE  5.2-11 
PROCEDURE  INVDIV 


TABLE  5.2-12 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVEND  - VENDl 
PROGRAM  EXECUTED;  VENDOl 

FUNCTIONS ; To  initiate  the  Vendor  Reference  File. 

PROCEDURE  FLOWCHART;  Figure  5.2-12 
FILES; 

FILE  NAME  DATA  SET  NAME  SEC 

INPUT; 

Vendor  File  Startup  Card  File  VENDCD  6 

OUTPUT; 

Vendor  Reference  File  M. VENDOR  6 

REPORTS ; 

Vendor  File  Edit  List 


REF. 


27 


13 
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FIGURE  5.2-12 

PROCEDURE  INVEND-VEND1 
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(b)  VEND2,  described  in  Table  5.2-13  and  Figure  5.2-13.  This 
procedure  executes  the  utility  program  lEBISAM,  described 
in  Section  7.27.  The  purpose  is  to  list  the  contents  of 
the  file  to  confirm  that  the  data  base  has  been  processed 
correctly. 

5.2.6  Inventory  Disk  Backup  Procedure 

The  Inventory  Disk  Backup  procedure,  INVBKUP,  is  described  in 
Table  5.2-14  and  Figure  5.2-14.  It  executes  the  utility  program, 
lEHDASDR,  to  dump  the  contents  of  the  Inventory  System  disk  to  mag- 
netic tape.  This  insures  an  accurate  starting  point  for  recovery 
procedures  in  the  event  of  a system  abend.  The  procedure  is  only 
executed  if  this  procedure  or  a similar  procedure  is  not  a standard 
operating  procedure  of  the  computer  center. 

5.2.7  Generation  of  Standard  Reports 

Three  optional  special-purpose  procedures  for  the  generation  of 
reports  have  been  provided.  These  procedures  enable  the  user  to  gen- 


erate reports  that  normally  are  generated  automatically  if  a system 
abend  occurs  during  the  execution  of  the  Job  ACTINVWK.  These  pro- 
cedures are  used  only  in  the  ea/ent  that  the  system  files  have  been 


updated.  The  procedures  are: 

(a)  INVR30,  described  in  Table  5.2-15  and  Figure  5.2-15.  This 
procedure  executes  the  Materials  Transaction  History  Report 
Generator  program,  RPOIOC; 

(b)  INVR32,  described  in  Table  5.2-16  and  Figure  5.2-16.  This 
procedure  executes  the  Receiving  Report  Generator  program, 
RP060;  and 

(c)  INVR34 , described  in  Table  5.2-17  and  Figure  5.2-17.  This 
procedure  executes  the  Division  Stock  Replacement  Report 
Generator,  RP016. 
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TABLE  5.2-13 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVEND  - VEND2 
PROGRAM  EXECUTED;  lEBISAM 

FUNCTIONS ; To  list  the  contents  of  the  Vendor  Reference  File  after 
start-up. 

PROCEDURE  FLOWCHART;  Figure  5.2-13 
FILES; 

FILE  NAME 

INPUT; 

Vendor  Reference  File 

OUTPUT ; 

None 

REPORTS; 

Listing  of  Initial  Vendor  Reference  File 


DATA  SET  NAME  SEC.  REF. 


M. VENDOR  6.13 
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FIGURE  5.2-13 

PROCEDURE  INVEND-VEND2 


LISTING  OF 
INITIAL 

^ VENDOR  FILE 
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TABLE  5.2-14 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVBKUP 
PROGRAM  EXECUTED;  lEHDASDR 

FUNCTIONS ; To. dump  the  contents  of  the  Inventory  System  disk  to 
magnetic  tape. 

PROCEDURE  FLOWCHART;  Figure  5.2-14 
FILES; 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT; 

Inventory  System  Control  File  S.CTL(CTLBKUP)  6.12 

Inventory  System  Disk  ACTINV 

OUTPUT; 

Tape  copy  of  Inventory  disk,  TRANS IT. INV.SAVE(+1) 

ACTINV 

REPORTS; 

None 


Note;  The  generation  data  set  index,  TRANSIT. INV. SAVE,  is  cataloged 
on  the  computer  installation  system  disk,  not  on  the  Inventory 
System  disk  pack,  ACTINV. 
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FIGURE  5.2-14 
PRCXJEDURE  INVBKUP 
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TABLE  5.2-15 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVR30 

PROGRAM  EXECUTED;  RPOIOC 

FUNCTIONS;  To  generate  the  Materials  Transaction  History  of  current 
transactions.  This  procedure  is  used  in  the  event  of  an 
abend  of  the  Inventory  System  after  the  files  have  been 
updated. 

PROCEDURE  FLOWCHART;  Figure  5.2-15 

FILES ; 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT; 

Inventory  Active  Master  File  M.INVACTV  6.3 

Current  Transaction  File  M.TRANDISK(O)  6.6 


OUTPUT; 

None 


REPORTS: 


Materials  Transaction  History 
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FIGURE  5.2-15 
PROCEDURE INVR30 
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TABLE  5.2-16 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVR32 
PROGRAM  EXECUTED;  RP060 

FUNCTIONS;  To  generate  Receiving  Reports.  This  procedure  is  used 
in  the  event  of  an  abend  of  the  Inventory  System  after 
the  files  have  been  updated. 

PROCEDURE  FLOWCHART;  Figure  5.2-16 

FILES; 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT; 

Purchase  Order  Transaction  M.POTRANS  6.10 

File 

Vendor  Reference  File  M. VENDOR  6.13 

OUTPUT; 

None 

REPORTS; 

Receiving  Report 

Amendment  to  Receiving  Report 
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FIGURE  5.2-16 
PROCEDURE  INVR32 


5-73 


TABLE  5.2-17 


PROCEDURE  SPECIFICATION 

PROCEDURE  NAME;  INVR34 
PROGRAM  EXECUTED;  RP016 

FUNCTIONS;  To. generate  the  Division  Stock  Replacement  report.  This 
procedure  is  used  in  the  event  of  an  abend  of  the 
Inventory  System  after  the  files  have  been  updated. 

PROCEDURE  FLOWCHART;  Figure  5.2-17 

FILES; 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT; 

Inventory  Active  Master  File  M.INVACTV  6.3 

Current  Transaction  File  M.TRANDISK(O)  6.6 


OUTPUT; 

None 


REPORTS ; 

Division  Stock  Replacement 
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FIGURE  5.2-17 
PROCEDURE INVR34 


DIVISION 
^ STOCK 

^ REPLACEMENT 
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No  procedure  has  been  provided  for  the  generation  of  the  Reorder 
Notification  reports  under  similar  circvnnstances . This  is  because  the 
program  is  considered  to  be  in  the  file  updating  phase  of  the  system. 


5-76 


5. 3 Cataloged  Procedures 


This  section  contains  listings  of  the  Inventory  System  procedures. 
These  listings  are  illustrative  only,  and  show  the  procedures  as  installed 
at  ACTD.  The  one  exception  is  procedure  INVBKUP,  which  is  installed  at 
DTS  only.  Other  procedures  installed  at  DTS  are  similar  to  the  ones 
given  in  this  section.  Table  5.3-1  specifies  each  procedure  name  and 
the  corresponding  figure  number  of  the  JCL  listing. 


TABLE  5.3-1 


CATALOGED  PROCEDURES 

Procedure  Name 

JCL  Listing  Figure 

INVDATE 

5.3-1 

INVUOl 

5.3-2 

INVR13 

5.3-3 

INVR22 

5.3-4 

INVR14 

5.3-5 

INVR17 

5.3-6 

INVB20 

5.3-7 

INVia.8 

5.3-8 

INVRIO 

5.3-9 

INLIST 

5.3-10 

INVR24 

5.3-11 

INVPRCOR 

5.3-12 

INWAL 

5.3-13 

INVCLS 

5.3-14 

INVCOU 

5.3-15 

INVQTY 

5.3-16 

INVDIV 

5.3-17 

INVEND 

5.3-18 

INVBKUP 

5.3-19 
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TABLE  5.3-1  (CONCLUDED) 


Note : 


CATALOGED  PROCEDURES 

Procedure  Name  JCL  Listing  Figure 


INVR30 

5.3-20 

INVR32 

5.3-21 

INVR34 

5.3-22 

All  listings  except  for  INVBKUP  are  of  procedures  installed 
at  ACTD.  INVBKUP  is  installed  at  DTS. 
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//♦  CTL  CN-1744, J0ATE»7412O 
7/INVDATE  PROC  ACNT«*CN1744.INV» 

//INVOATE  EXEC  PGK-IEBGENER* REGI0N»40K 
//SYSPRINT  DO  DUMMY 
//SYSUTl  DO  OONAME«OATECO 

//SYSUT2  OD  OSN»&ACNT..S.CATEtOISP«OLD,VOL«PRIVATE 
//SYSIN  OD  OSN«&ACNT««S*CTL(INVOTE01)tOISP-OLOtVOt«f^IVATE 


FIGURE  5.3-1 
PROCEDURE  lISlVDATE 
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//•  CTL  CN-1744t JOATE-74091 

//INVUOl  PROC  ACNT«'CN1744.INV*fOSK-*ACTINV 
//INVOl  EXEC  PGM=0A200A«REGI0N=40K,COND>(7tLE) 

//STEPLIB  OD  OSN>S.ACNT«.LCAO.OISP>SHR,VOL«(PRIVATE»RETAlN  ) 

//SYSUOUMP  DO  SYSOUT*A 

//PRINTOl  DD  SYS0UT»A,DCB»(RECFH-FB,LRECL-133,BLKSIZE- 13301 
//0TRAN07  DO  DSN»t 1NVTRN,0ISP= ( NEW, PASS) t UNI T*SYSDA, 

//  SPACE=(TRK, (100,10),RLSE»,DCB=IRECFM»FB,LRECL=80, BLKSIZE=7280) 
//ITRAN08  00  OONAME>TRANCC 

//INV03  EXEC  PGH=*DA300C,CCND=I7,LE),REGI0N*112K, 

//  PARM»*  AC  TRANSIT  • 

//STEPLIB  00  DSN=tACNT«*LCAD,OISP=SHR, VOL»(PRIVATE, RETAIN ) 

//SYSUOUMP  00  SYSOUT=A 

//PRINTOl  00  SYS0UT=A,DCe=(RECFM=FB,LRECL=133,BLKSIZE=1330) 

//IMSTR02  00  DSN=tACNT.,P. VENDOR, DISP=OLO,VOL=PRIVATE 
//PRINT03  00  SYSQUT=A,0CE=*(RECFM*Fe,LRECL»133,BLKSIZE  = 1330) 

//CNTRL04  00  OSN= CACNT, • S.CONST, 0 1 SP=OLD , VCL  = PR I VATE 
//PRINT09  00  SYS0UT*A,DCE=(RECFM=FB,LRECL=133,BLKSIZE=1330) 

//□TRAN07  00  DSN=tACNT..M.TEMP,OI SP=(OLD, PASS ) , VOL=(PR IVATE,RETAIN) 
//ITRAN08  00  DSN=UNVTBN,CISP=»(OLO,PASS) 

//ITRAN09  00  0SN=CACNT..SUSPFILE(0) ,OISP=OLD, VOL»PRIVATE 
//SORTLIB  DO  0SN=SYS1.S0RTLIB,DISP=SHR 
//SYSOUT  DO  SYS0UT=A 

//STRAN06  00  OSN  = tACNT,.M. SRT EMP , 01 SP= I OLD , PASS ) , VOL= ( PR  I VATE , RET  AIN ) 
//SORTWKOl  00  UNIT=2314,SPACE*(CYL,(6,2),,C0NTIG) 

//S0RTWK02  00  UN  I T=2314 , SF ACE » ( CYL , ( 6 , 2 ) , ,CONT I G ) 

//S0RTWK03  00  UN  IT  = 2314,SPACE=-(CYL  , ( 6, 2)  , ,CONT  IG) 

//INV05  EXEC  PGM*0G300E,CCND=(7,LE) ,REGI0N*240K, 

//  PARM=*'  AC  TRANSIT  • 

//STEPLIB  00  DSN=&ACNT,.LCAO,DISP»SHR,VOL=(PRIVATE, RETAIN) 

//SYSUOUMP  00  SYSOUT=A 

//IMSTROl  DO  DSN=£ACNT..M,  INVENT! 0) , 0 1 SP=OLD , UN IT= ! 2400-3 , , OE FE R ) 
//0MSTR02  00  0SN-£ACNT.,H.INVENT(+1),0ISP=(NEW,CATLG, DELETE), 

//  UNIT={  2400-3,  , DEFER  ),  LAB  EL:*  ( ,SL)  , 

//  0CB=(RECFM=FB,LRECL*=60,8LKSIZE=19  200) 

//1MSTR03  00  0SN  = £ACNT..M.INVCLASS(0) , 01 SP*OLD, V0L= ( PR  I V ATE ,R ETA  I N ) 
//0MSTR04  00  DSN=£ACNT,,M.INVCLASS(>1) ,DISP= (NEW, CATLG, DELETE) , 

//  DCB=(RECFM  = FB,LPECL:*60,  BLKSIZE:*2400  ) , 

//  UNIT=2314,SPACE= (TRK , ( 10 , 5 ) , RLSE ) , 

//  VOL=(PRIVATE, RETAIN, SER*£CSK) 

//ITRAN05  00  DSN=£ACNT,.M,SRTEMP,DISP=OLD,VOL=(PRIVATE, RETAIN) 

//0TRAN06  DO  OS N=£AC NT ..M . IN VACT V , 0ISP= ( OLD, PASS ) , VQL= ( PRI VATE, R ETA  IN ) 
//0TRAN07  DO  OSN-£ACNT«.M« IN VSUSPN,OI SP- ( OLD, PASS ) , 

//  VOL«(PRIVATE, RETAIN) 

//PRINT09  DO  SYSOUT=A,OCe«(RECFM»F,LRECL»133,BLKSIZE*133) 

//PRINTIO  DO  SYSOUTaA,OCe=lRECFM»F,LRECL»133,BLKSIZE=133) 

//OTRANll  00  DSN=£ACNT.,M,POTRANS,CISP*(OLD,PASS)  ,VOL*=PRIVATE, 

//  0CB*:BUFN0*1 

//0TRAN12  00  SYSOUT»A,DCB»(RECFM=FB,LRECL= 133, BLKSIZE= 1330) 

//0TRAN13  00  OS N-£ACNT,, M, TR ANOI SK (+1 ), OISP= (NEW, CATLG, DELETE), 

//  SPACE=(CYL,( 5,1), RLSE, CONTIG) ,UNIT=2314, 

//  DCB=(RECFM=FB,LRECL*=127,BLKSIZE=7239),V0L*(PRIVATE,SER=£DSK) 

//IMSTR14  00  OSN«£ACNT..S. CONST, DISP»OLO,VOL=(PRIVATE, RETAIN), 

//  DCB*BUFN0»1 

//INV07  EXEC  PGM>RPOOOA,CCNO-(7,LE),REGION=164K 
//STEPLIB  00  OSN=tACNT«,LOAD,DISP>*SHR,VOL=(PRIVATE, RETAIN) 

//SYSUOUMP  DO  SYSOUT*A 

//IMSTROl  00  0SN>£ACNT..P.TRANTAPE(0)  ,01 SP*OLO ,UN IT* ( 2400-3 ,, DEFER ) 

//0MSTR02  DO  OSN* £ACNT ••M.TRANTAPE ( »1 ), 01 SP* (NEW, CATLG, DELETE ) , 

FIGURE  5.3-2 
PROCEDURE INVUOl 
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//  UN  IT*(  2400-3*  .DEFER  ),LABEL«I  *SU* 

//  DCB«<RECFM«FB.LRECL«127,BLKSIZE»31750) 

//ITRAN03  DO  OSN»£ACNT..M.TRANOI  SK<4-1J  ,OISP»OLO,VOL=«PRI VATE 
//INVll  EXEC  PGM»RP01iC*CCN0<(7»LE)»REGION«5OK* 

//  PARH«*  AC  TRANSIT  • 

//STEPLIB  DO  OSN«iACNT..LCAD,DISP»SHR,VOL»<PRIVATE*RETAIN) 
//SYSOUT  00  SYSOUT*A 
//SYSUOUMP  DO  SYSOUT»A 


//PRINTOl  00  SYS0UT»A.DCe»(RECFM«F,LReCL»133,BLKSIZE«133» 
//INSTR02  DO  0SN-CACNT..M«INVACTV*01SP«0LD.V0L»(PRIVATE*RETAIN) 
//0ATE03  DO  OSN=>CACNT«»S«OATEtOISP«OLO*VOL«(PRIVATE*RETAlN) 
//CNTRL04  OD  OSN>£ACNT««S«CONST»01SP«OLO*VOL>( PRIVATE* RETAIN) 
//ERR05  00  SYSOUT*A*OCB«<RECFM«F*LRECL-133*BLKSIZE«133) 

//PRINT06  DO  SYS0UT»A*DCB»(RECFM»FB*LRECL*133*BLKSIZE»7182I 
//ITRAN07  00  DSN«CACNT.«M.lNVSUSPN*OISP«OLO*VOL«fPRIVATE« RETAIN) 
//0TRAN08  DO  OSN>CACNT. .SUSPFI LE( ♦!)* DISP>f NEW* CATLG* DELETE) * 

//  UNIT>2314*V0L-(PRIVATE*SER«L0SK) * 

//  SPACE*(TRK*(10*5)*RLSE)* 

//  0CB«(RECFM»F8*LRECL«80*BLKSIZE«7200) 

//INV13  EXEC  PGM«RP010C*CCNO>C7*LE) *REGI0N«66K, 

//  PARM«*  AC  TRANSIT  • 

//STEPLIB  00  OSN*SACNT..LCAD*OISP«SHR*VOL=>(PRIVATE*RETAIN) 
//SYSUOUMP  00  SYSQUT»A 

SYSOUT*A*OCe«(RECFH«FB*LRECL>133,BLKSIZE>7182) 

OS N> CACNT..N. IN VACT V* 01 SP>OLO* VOL* (PRIVATE. RETAIN) 
OSN«&ACNT..M.TRANOISK(«-1).OISP*OLO.VOL  = PRIVATE 
PGH>RP060B*COND-(7*LE) *REGI0N*1I2K. 

AC  TRANSIT  • 

OSN«&ACNT««LCAO.OISP*SHR*VOL>( PRIVATE. RETAIN) 

DUMMY 


//PRINTOl  DO 
//IMSTRll  00 
//IMSTR12  DO 
//INV15  EXEC 
//  PARM** 

//STEPLIB  00 
//SYSOUT  DO 
//SYSUOUMP  00  SYSOUT*A 

//PRINTOl  DO  SYS0UT«A*0CB»(RECFM*F8*LRECL=133.BLKSIZE»7182) 

//H0RK02  DO  0SN*8£SRTP0.CISP*(NEW.CELETE) .UNIT=SYSOA* 

//  SPACE-(CYL.(5*1)**CCMTIG)*0CB*(RECFM=FB.LRECL»70*BLKSIZE*7280) 

//S0RT06  DO  DSN*£CSORT*OISP*(NEW*OELETE).UNIT*SYSOA. 

//  SPACE* (CYL.( 5.1)* .CCRTIG)*DCB*(RECFM*FB.LRECL*70.BLKSIZE=7280) 

//IMSTROl  00  DSN*£ACNT..M«POTRANS*OISP*OLO.VOL*(PR1VATE*RETAIN) 
//IMSTR03  DO  DSN*&ACNT*.M«VENOOR*D1SP«OLO*VOL*(PRIVATE. RETAIN) 
//SORTLIB  00  OSN*SYS1.SORTLIB*OI SP«SHR 
//SORTWKOl  00  UNIT=SYSDA*SPACE*(CYL*( 5*1)**C0NT1G) 

//S0RTWK02  00  UN IT*SYSOA* SPACE*( CYL* ( 5*1 ) * .CONTIG ) 

//SORTWK03  00  UN IT*SYSOA*SPACE* ( CYL * ( 5. 1) . .CONTIG ) 

//INV19  EXEC  PGM*RP016C«CON0*(7.LE).REGI0N*70K. 

//  PARM*'  AC  TRANSIT  • 

//STEPLIB  00  DSN*£ACNT.«LCAO*OISP*SHR.VOL*(PRIVATE. RETAIN) 

//SYSUOUMP  DO  SYSOUT»A 

//ITRANOl  DO  OSN*£ACNT..M*INVACTV.OISP*OLO.VOL»(PRIVATE. RETAIN) 
//IMSTROl  00  0SN*£ACNT««M.TRAN0ISKU1)  *DISP*OLO.VOL*PRIVATE 
//PRINTOO  00  SYS0UT»A*0C8*(RECFM*FB.LRECL*133.BLKSIZE=7182) 
//PRINTOl  DO  DUMMY. DCB* (RECFM*F.LRECL=133.BLKSIZE= 133) 

//PRINT02  DO  DUMMY. CCB*(RECFM*F.LRECL=133.BLKSIZE=133) 

//PRINT03  00  SYS0UT*A.DCe=(RECFM=FB.LRECL*133.BLKSIZE=7l82) 
//PRINT04  00  SYSOUT*A*OCe*(RECFM»F8*LRECL*133.BLKSIZE*7182) 


FIGURE  5.3-2  (CONCLUDED) 
PROCEDURE  INVU01 
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//♦  CTL  CN-1744, JOATE-74091 

//1NVR13  PROC  ACNT-*CN1744«INV'tVERS»'+l* 

//INVR13  EXEC  P6H«RP013CtC0N0*{7tLE)tREG10N-160Kt 
//  PARM»*  AC  TRANSIT  • 

//STEPLIB  DO  OSN«CACNT..LOAOtOISP>SHR«VOL«(PRIVATE.RETAINI 
//SORTMKOl  DO  UN1T-2314.SFACE* (CYL* (6» 1 ) » * CONT IG) 

//S0RTWK02  DO  UN  IT-2314, SPACE-(CYL. (6. 1) . .CONTIG) 

//S0RTWK03  DO  UNIT-2314 .SPACE- (CYL , (6, 1 ),* CONT IG ) 

//SORTLIB  DO  OSN-SYSl«SOR1LIB,OISP«SHR 
//SYSUOUMP  OD  SYSOUT-A 
//SYSOUT  OD  SYSOUT-A 

//PRINTOI  DO  SYSOUT-A, DCE-(RECFM-FB,LRECL-133,BLKSIZE-7182» 

//1NSTR02  OD  OSN-SACNT..M.INVENTUVERS.),OISP-(OLO,PASS),UNIT=( ,,  DEFER) 
//0ATE03  DO  OSN-CACNT.«S«CATE,OISP-OLD,VOL-IPRIVATE, RETAIN) 

//CNTRL04  OD  DSN*6ACNT.,S,C0NST,0ISP-0LD,V0L=PRIVATE 
//ERR05  DO  SYSOUT-A, 0CB-(RECFH-F,LRECL-133,BLKSIZE-133) 

//UORK06  DO  DSN-CSORT, UNIT-2314, OlSP-i  NEW, DELETE) , 

//  SPACE-(CYL, (5,1),,C0KT16),DCB-IRECFM-FB,LRECL-65,BLKSIZE«7280) 
//W0RK07  DO  DSN-C;REP0RT,UNIT-2314,0ISP-(NEW, DELETE), 

//  SPACE-ICYL, (5,ll,,CCNTIG),CCB-fRECFM-FB,LRECL-65,BLKSIZE-7280) 


FIGURE  5.3-3 
PROCEDURE INVR13 
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//•  CTL  CN-1744. JOATE-74091 

//1NVR22  PRQC  ACNT* • CN1744. INV* . VERS* • 

//INVR22  EXEC  P6H-RP022C.CON0-I 7. LE) » REGION*! 50K, 

//  PARM-*  AC  TRANSIT  * 

//STEPLIB  00  OSN«&ACNT..LOAOfOISP*SHR»VOL«(PRlVATEtRETAIN) 

//SORTUKOl  00  UNIT«SYSOA«SPACE*fCYL»t 6«li ..CONTIG) 

//SORTWK02  DO  UN lT*SYSOA.SPACE«f CYL* ( 6, II , ,C0NT1G ) 

//SORTUK03  00  UNI T*SYSOA«SPACE> ( CYL » ( 6,1 I , »CONTIG I 
//SORTLIB  00  OSN«SYS1*SCRTLIB,OISP>SHR 
//SYSUOUMP  DO  SYSOUT*A 
//SYSOUT  00  DUMMY 

//PRINTOI  00  SYS0UT«A,0Ce*fRECFM*FB,LRECL*133,BLKSIZE*7I82) 

//1MSTR02  00  OSN«&ACNT«.H«INVENTUVERS.),DISP-(OLO,PASS), 

//  UNIT*!, .DEFER) 

//DATE03  00  OSN«&ACNT..S.OATE,01SP*OLO,VOL*(PRIVATE, RETAIN) 

//CNTRL04  00  OSN*&ACNT..S«CONST, 01 SP*OLO, VOL-PRI VATE 
//SORT06  00  OSN«&CSORT,UNIT*SYSOA,OISP«(NB), DELETE), 

//  SPACE«(CYL,(5,1) , .CONTIG) ,0CB*«RECFM«FB,LRECL>67,BLKSIZE*7236) 

//W0RK07  00  OSN«CCREPORT, UNIT*SYSOA,OISP*(NEU, DELETE) , 

//  SPACE-ICYL,t5,l) ,,CCNTIG),0Ce»(RECFM*FB,LRECL»67,BLKSIZE»7236) 

//IMSTR08  00  OSN«&ACNT..M.VENOOR,OISP*OLOyVOL*(PRIVATE, RETAIN) 


FIGURE  5.3-4 
PROCEDURE  INVR22 
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//♦  CTL  CN»1744t J0ATE»740S1 

//INVR14  PROC  ACNT»*CN1744«INV*tVERS»*>l* 

//1NVR14  EXEC  PGH«RP014C»C0N0«(7tLE)«REGION-150Kf 
//  PARH-*  AC  TRANSIT  • 

//STEPLIB  00  OSN«CACNT..LOAO*OISP«SHRtVOL>(PRIVATEtRETAIN) 

//SORTWKOl  00  UNIT*2314.SPACE»(CYLt(6»l)»»C0NTIG) 

//S0RTMK02  00  UNIT«2314,SPACE«(CYLt(6, 1) « tCONTIGl 
//SORTUK03  00  UNIT»2314,SPACE«fCYL« C6, 1) , .CONTIG) 

//SORTLIB  00  OSN«SYSl.SORTLlBtOISP«SHR 
//SYSUDUNP  00  SYSOUT>A 
//SVSOUT  00  SYSOUT«A 

//PRINTOl  00  SYSOUT»A,OCe-<RECFM=FB»LRECL=>133,BLKSIZE=7182) 

//IHSTR02  00  OSN-CACNT..N«INVENT(CVERS.)tOISP«(OLOtPASSI»UNIT>:( ,,  DEFER) 
//0ATE03  00  0SN-£ACNT..S«CATEt01SP«0L0,V0L=*iPRIVATE, RETAIN) 

//ERR05  00  SYS0UT»A,0Ce=(RECFMaF,LRECL«133tBLKSIZE»133) 

//W0RK06  00  0SN»CS0RTtUNIT>2314«0ISP«C NEWtDELETE)f 

//  SPACE>(CYL« ( 5,1), .C0NTIG)t0CB*(RECFM«F6»LRECL>54.BLKSIZE=7236) 
//W0RK07  00  0SN>CREP0RT,UNIT«2314,0ISP«(NEW, DELETE), 

//  SPACE* (CYL,  I 5,1 ) ,,C0)>TIG),0C6*(RECFM-FB,LRECL*54,BLKSIZE*7236) 
//1MSTR08  DO  DSN«&ACNT..M«VENOOR,OISP>OLD,VOL*(PRIVATE, RETAIN) 


FIGURE  5.3-5 
PROCEDURE INVR14 
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//•  CTL  CN-1744, J0ATE«74091 

//INVR17  PROC  ACNT**CN1744.INV»,VERS=»+1' 

//INVR17  EXEC  PGH>RP017C»CON0>(7«LE) tREGI0N<60K, 

//  PARM«»  AC  TRANSIT  • 

//STEPLIB  DO  OSN>&ACNT*.LCAO»OISP«SHR*VOL>(PRIVATE»RETAIN) 
//SYSUDUHP  DO  SYSOUT-A 

//PRINTOl  00  SYSQUT>A»0Ce>(RECFM«F8tLRECL»133«BLKSIZE»7182) 
//INSTR02  00  0SN«CACNTo.R.INVENTUVERS.)t01SP>(0L0«PASS)« 

//  UNIT=°(*«OEFER) 

//0ATE03  00  OSN«CACNT.«S.DATEtOISP>OLO»VQL«(PRlVATE, RETAIN ) 

//ERR05  00  SYS0UT«At0CB>IRECFM»F>LRECL«133»BLKSIZE=133) 


FIGURE  5.3-6 
PROCEDURE  INVR17 
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It*  CTL  CN*1 744, JDATE- 74091 

//INVR20  PROC  ACNT«'CN174^.INV» ,VERS*»+1* 

//INVR20  EXEC  PGM-RP020C, CQN0«(7, LE) ,REGI0N=60K, 

//  PARM-*  AC  TRANSIT  • 

//STEPLIB  00  OSN«&ACNT.*LCAO,OISP>SHR,VOL>(PRIVATE, RETAIN) 
//SYSUOONP  00  SYSOUT*A 

//IHSTROl  00  OSN>CACNT..M«INVCLASS(CVERS.  J ,OISP<^OLO,VQL>PRIVATE 
//PRINT02  00  SYS0UT*A,DCB=(RECFH=FB,LRECL=133,BLKSIZE*7182) 

//0ATE03  DO  DSN»£ACNT,. S. DATE, DISP*OLD,VOL*IPRIVATE, RETAIN) 
//CONST04  00  0SN>CACNT..S.C0NST.01SP»0L0,V0L>(PRIVATE, RETAIN) 


FIGURE  5.3-7 
PROCEDURE  INVR20 
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//•  CTL  CN*1744t JOATE-74091 

//1NVR18  PROC  ACNT»*CN1744*INV*tVERS-»*l* 

//INVR18  EXEC  PGM*RP018CfREGIQN>62K»COND«(7tLEl» 

//  PARM-*  AC  TRANSIT  • 

//STEPLIB  DO  DSN-&ACNT..LCAOtOISP>SHR«VOL«(PRlVATEfRETAINI 
//SYSUOUMP  DO  SYSOUT«A 

//PRINTOl  DO  SVS0UT«A,0CB-(RECFM«F,LRECL«133tBLKSlZE«7182) 

//1NSTR02  DO  OSN«CACNT«.R.INVENT(&VERS.J »OISP>OLOt 
//  UNIT-(2400-3tf0EFERI 

//0ATE03  DO  DSN»SACNT«.S.OATE«OISP>OLO»VOL«( PRIVATEfRETAINI 
//CNTRL04  DO  OSN«CACNT** S«CONST,OI SP«OLO* VQL« ( PRIVATE* RETAIN) 


FIGURE  5.3-8 
PROCEOlfflE  INVR18 
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//INVRIO  PROC  ACNT«*CN1744«INV*»VERS«*4^1* 

//INVRIO  EXEC  PGH«RP0100•CONO>l7tLE},REGI0^^160K• 

//  PARM«»  AC  TRANSIT  • 

//STEPLIC  DO  OSN«CACNT..LCAD,OISPsSHRtVOL«CPRIVATE«RETAIN) 
//SYSUDUNP  DO  SYSOUT«A 

//PRINTOl  DO  SYSOUT>A*OCB«(RECFH>FBf LRECLal33»BLKSIZE»7182) 
//PRINT02  DO  SYSOUT«A»OCe>(RECFN>FtLRECL-133*BLKSIZE«133) 
//IHSTRIO  DO  OONAHE«SYSIN 

//INSTRll  DD  OSN>&ACNT«««.INVENTISVERS«l«OISP>(OLO»PASS)t 
//  UNIT- DEFER) 

//ITRANI2  DO  OSN«CACNT*.H.TRANTAPE(CVERS.)tDISP»(OLD«PASS)» 
//  UNIT»(,, DEFER) 

//0TRAN14  DO  OSN>CCTEMP. 0ISP>( NEWt DEL ETE ) tUN IT^SYSOA • 

//  0CB«(RECFM«FB»LRECL-127»BLKSIZE>7239)» 

//  SPACE>(CYL»(3»2)i 


FIGURE  5.3-9 
PROCEDURE  INVRIO 


//♦  CTL  CN-1744# JDATE-74091 

//iNLIST  PROC  ACNT-«CN1744«INV* »VERS«*0* 

//INLIST  EXEC  PGM>INVLSTBtCONO-(7fLEItREGION«64K, 

//  PARM-*  AC  TRANSIT  * 

//STEPLIB  00  OSN<&ACNT».LCAO*OISP«OLO«VOL>PRIVATE 
//ICAROOl  00  OONAME-SYSIN 

//INSTR02  00  0SN«CACNT*«N«lNVENTCCVERS.)t0ISP-0L0tUNIT«2400 
//PRINT03  00  SYS0UT>A*0CB«(LRECL-133»BLKSIZE«7182*RECFM-FB) 
//PRINT04  00  SYS0UT>A,0CB>1LRECL«133»BLKSIZE-1330»RECFM«FB) 
//SYSUOUMP  00  SYS0UT>A 


FIGURE  5.3-10 
PROCEDURE  INLIST 
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//♦  CTL  CH-1744.J0ATE- 74091 
//1NVR24  PROC  ACNT«*CN1744.INV* 

//INVR24  EXEC  PGH«RP024A.C0N0«(7»LE)f REG10N>40K, 

//  PARM»*  AC  TRANSIT  • 

//STEPLIB  DO  OSN«C.ACNT.*LGAO«DISP«SHR,  VOL«(PRIVATEfRETAIN) 
//SYSUOUNP  DO  SYSOUT«A 

//PR1NT03  00  SYS0UT>A*0Ce«IRECFH-FBtLRECL«133»BLKSIZE«7I82) 

//CAR002  00  OONAHE-SYSIN 

//1MSTR06  00  DSN>CACNT«.M«VENOORt01SP«OLO»VOL>(PRIVATE»RETAINl 


FIGURE  5.3-11 
PROCEDURE  INVR24 
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//*  CTL  CN-l 744, JOATE- 74091 

//INVPRCOR  PROC  ACNT>'CN1744.iNV'tOSK«*ACTINV' 

//INVPROl  EXEC  PGM«0A250A«C0N0«(7tLE}.REGION«120K, 

//  PARM-*  AC  TRANSIT 

//STEPLIB  00  OSN«fiACNT*.LOAO«OISP-SHR»VOL«(PRlVATEtRETAIN) 

//STSOUT  00  SYSOUT-A 
//SYSUOUMP  00  SYSOUT-A 

//SORTWKOl  00  UNIT«2314.SPACE>=(CYL.(6t2)ttC0NTIG) 

//S0RTWK02  00  UNIT-2314, SPACE-(CYL. (6.2) t tCONTIG) 

//S0RTWK03  00  UNIT-2314, SPACE-(CYL,(6, 2)*, CONTIG) 

//SORTLIB  00  0SN«SYS1.S0RTLIB,0ISP«SHR 

//PRINTOl  00  SYS0UT-A,0Ce=-(RECFM-FB,LRECL-133,BLKSIZE«1330l 
//ITRANS02  00  OSN-CACNT..P«TRANT/tPE(OI  , UNIT-2400, OISP-OLO 
//ETRANS03  00  OSN-CETRANS ,UNIT-SYSDA, CISP-( NEH.OELETE ) , 

//  SPACE*(CYL,( 5,1),  ,CONlIG»cOCB-(RECFM»FB,LRECL-107,BLKSIZE-7276) 
//OTRANIO  00  OSN-GACNT..P.SRTEMP,OISP-(OLO, PASS), VOL- (PRIVATE, RETAIN) 
//ir.AROOS  00  OONAME-PCTRAN 

//OTRANS04  00  0SN-£0TRANS,UNIT-SYS0A,01SP-(NEW,0ELETE ) , 

//  SPACE -(CYL,( 3,1),, CONTIG ),0Ce-(RECFM-FB,LRECL-99,BLKSIZE^7227) 

//SCAR006  00  OSN-£SCARD,UNIT-SYSOA,OISP-(NEM,OELETE). 

//  SPACE-(TRK,(1,1) ,, CONTIG), 0CB-(RECFH-FB,LRECL=27,BLKSIZE-270) 

//0CAR007  00  OSN>GOCArO,UNIT>SYSOA,OISP«(NEW,OELETE), 

//  SPACE »(TR K, ( 1, 1 ) ,,CCNTIG), oca- (RECFM-FB,LRECL-27,BLKSIZE=?70) 

//STRANS08  00  OSN-GSTRANS ,UNI T-SYSOA, OISP- ( NEW, OELETE ) , 

//  SPACE«(CYL, (5,1),, CONTIG), 0CB-(RECFH-FB,LRECL-105,BLKSIZE-7245) 

//STEMP09  00  OSN-&STERP,UNIT-SYSOA,OISP«(NEW,OELETE), 

//  SP  ACE  «(CYL,  I 5.1)',, CONTIG ) ,0CB-(RECFM«FB,LRECL-105,BLKSIZE-7245) 

//INVPR05  EXEC  P 6M-0G300E ,CONO«( 7 . LE) , REGI0N-240K, 

//  PARH-*  AC  TRANSIT 

//STEPLIB  00  OSN-CACNT..LCAO,OISP-SHR,VOL-(PRlVATE, RETAIN) 

//SYSUOUMP  00  SYSOUT-A 

//IMSTROl  00  OSN-GACNT..M. INVENT) 0), 01 SP-OLO, UNIT- (2400-3,, OEFER) 
//0HSTR02  00  0SN>CACNT..M.INVENT(«1),0ISP-(NEW,CATLG,0ELETE) , 

//  UNIT-(2400-3,, DEFER), LABEL-) ,SL), 

//  DCB-(RECFM-FB,LRECL-60,BLKSIZE-19200) 

//INSTR03  00  0SN-&ACNT..M,1NVCLASS(0) ,OISP-OLO,VOL-(PRIVATE, RETAIN) 
//0MSTR04  DO  0SN-£ACNT..M.INVCLASS(«1 ) ,OISP- (NEW, CATLG, DELETE ) , 

//  DC8-(RECFM-FB,LRECL-60,BLKSIZE-2400), 

//  UN  IT-2314, SPACE-(TRK,( 10, 5 ),RLSE), 

//  V0L-(PR1VATE, RETAIN, SER-&OSK) 

//ITRAN05  00  OSN-CACNT..H«SRTEMP,DISP-OLO,VOL«( PRIVATE, RETAIN) 

//0TRAN06  00  OSN-&ACNT«.M.INVACTV,DISP-(OLD, PASS ), VOL- (PRIVATE, RETAIN) 

//0TRAN07  DO  OSN- &ACNT.«>)I«1N  VSUSPN.DI SP«(  OLD, PASS) , 

//  VOL-(PRIVATE, RETAIN) 

//PRINT09  00  SYSOUT-A, 0Ce-(RECFM«F,LRECL-133,BLKSIZE-133) 

//PRINTIO  00  SVS0UT-A,0Ce-(RECFN-F,LRECL-133,BLKSIZE-133) 

//OTRANll  00  OSN-£ACRT..P^POTRANS,OISP-(OLO,PASS),VOL-PRIVATE, 

//  OCB-BUFNO-1 

//0TRAN12  DO  SYSOUT-A, OCB- (RECFM-FB,LRECL- 133, BLKS IZE- 1330) 

//0TRAN13  00  0SN-£ACNT..F.TRAN0ISK(4-1),0ISP-(NEW,CATLG, DELETE), 

//  SPACE-I CYL,( 5, 1),8LSE, CONTIG), UN  IT-2314, 

//  0CB-(RECFM-FB,LRECL-127,BLKSIZE-7239),V0L-(PRIVATE,SER-£0SK) 

//INSTR14  DO  0SN-&ACNT«.S.C0NST,0ISP-0L0,V0L-(PRIVATE,RETA1N), 

//  DCB-BUFNO-1 

//INVPR07  EXEC  PGM-RP000A,C0N0-(7,LE) ,REG10N-164K 
//STEPLIB  00  OSN-£ACNT..LCAD,OISP-SHR,VOL-(PRIVATE, RETAIN) 

//SYSUOUMP  DO  SVSOUT-A 

//IMSTROl  DO  0SN-&ACNT..M.TRANTAPE(0) ,OISP-OLO, UNIT-) 2400-3, .DEFER) 
//0MSTR02  00  OSN-£ACNT..M.TRANTAPEO-1),OISP-(NEW,CATLG,OELETE), 

FIGURE  5.3-12 
PROCEDURE  INVPRCOR 
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//  UNIT«(2400r3ttOEFER)«LABEL>(  »SU» 

//  0CB>(RECFM«F6»LRECL-127»BLKSI2E*31750) 

//ITRAN03  DO  OSN«&ACNT..F.TRANOISKf«>l ) »OISP-OLO»  VOL^PRIVATE 
//1NVPR13  EXEC  P6M-RP010C«COND>f 7fLE) »REGI0N-66K, 

//  PARM«*  AC  TRANSIT  * 

//STEPLIB  DO  OSN«&ACNT««LCAO,OISP«SHR,VOL>(PRIVATE*RETAIN) 
//SYSUDUMP  DO  SVSOUT»A 

//PRINTOl  DO  SYSOUT«A»OCB«lRECFM-FBf LRECL«133*BLKSIZE«7182) 
//INSTRll  DO  OSN«&ACNT..R«INVACTV»OISP«QLO»VOL«(PRIVATE»RETAIN) 
//IMSTR12  DO  OSN«CACNT«.N«TRANOISKI«-lJ  «OISP>OLO,VOL>PRIVATE 


FIGURE  5.3-12  (CONCLUDED) 
PROCEDURE  INVPRCOR 
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//•  CTL  CN-1744«J0ATE- 74120 
//INVVAL  PROC  ACNT«*CN1744.INV* 

//INVVAL  EXEC  PGN-lNVVACJt RE6I0N-120K»C0N0«( 7«LE) 

//STEPLIB  00  OSN«£ACNT..LCAOfOISP»SHRtVOL*PRIVATE 
//INSTR02  00  OSN>CACNT..M«INVENTIOI t0ISP>0L0tUNIT-2400 

//PRINT03  00  SYS0UT«A«CCB*(RECFH>FB»LRECL*133.BLKSI2E<1330) 

//0TRAN04  00  OSN>CVALAOJtOISP«INEW» PASSItUNIT«SYSOA* 

//  SPACE- (TRK, 1100. 20 J .RISE) tCCB«(RECFH>FB»LRECL«80»BLKSIZE>7200l 

//ITRANOl  00  0SN»CACNT«.S«0ATE»01SP-OL0tV0L«PRIVATE 


FIGURE  5.3-13 
PROCEDURE INVVAL 
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//♦  CTL  CN«1 744. JOATE> 74120 

//INVCLS  PROC  ACNT-*CN1744.INV* .OSK«'ACTINV' 

//INVCLS  EXEC  PGM-INVCACJ.REGI0N«120K.C0ND«f 7.LE) 

//STEPLIB  00  OSN»eACNT.«LOAO»OISP>SHR.VOL«PRIVATE 
//INSTR02  00  OSN>CACNT.«M.INVENT(0).OISP«OLO»UNIT=>2400 

//IMSTR03  00  0SN>&ACNT.«M.INVCLASS(0) tOISP«OLO»VOL«PRIVATE 

//PR1NT03  00  SVSOUT-A.0CB>fRECFH>FBtLRECL«133.BLKSIZE>1330) 

//0MSTR04  00  DSN«CACM..M«INVCLASS(>l).OISP«INEW.CATLG.OELETEIt 

//  UNIT«2314.V0L«<PRI VA1E.SER-C0SK).SPACE«f TRK,<20*10)tRLSE). 

//  KB«(RECFH«FB.LRECL-60,BLKS1ZE>2400) 

//ITRANOl  DO  OSN«CACNT«.S«OATEtOISP«OLOtVOL>PRlVATE 


FIGURE  5.3-14 
PROCEDURE INVCLS 
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//•  CTL  CN-1744. JOATE-74132 

//INVCOU  PROC  ACNT*«CN1744.INV* «VERS«*0* 

//INVCOU  EXEC  PGM*lNVCOUNT»CONO«f 7*LE}»REG10N«120K 
//STEPLIB  00  OSN>S;ACNT..LCAOtOISPaSHR,VOL«IPRIVATEtRETAlN) 

//SYSUOUMP  00  SYSOUT-A 

//SYSOUT  00  SYSOUT-A 

//SORTLIB  00  0SN«SYSl.S0RTLie»01SP*SHR 

//SORTWKOl  00  UNIT«SYS0A«SPACE>ICYLt(5»l),,C0NTIG) 

//S0RTWK02  00  UN IT-SYSOA»SPACE»(CYL»( 5* 1) • ,CONTIG) 

//S0RTUK03  00  UNIT-SYS0A*SPACE>(CYL«(5,1I • .CONTIGI 
//IMSTROl  00  0SN>&ACNT.«N.]NVENT(&VERS)*01SP«0L0*UNIT>2400 
//PRINT04  00  SYS0UT»AtCCB«fLRECL-133»BLKSIZE>1330>RECFM«FB) 
//WORK05  00  OSN-&SORT,UNIT>SYSOAtOISP«fNEM«OELETEI  » 

//  SPACE- (CYL*<5fl)*«CCNTIG)t0CB-(RECFM«FB,LRECL«80fBLKSIZE«7280) 

//W0RK06  00  OSN-&OSORTtUNIT«SYSOA,DISP«(NEWtOELETE), 

//  SPACE-fCYLt f 5«l).*CCNTIG)t0CB-(RECFH«FB.LRECL«80»BLKSIZE-7280) 

//0ATE06  00  OSN-£ACNT..S.OATEtCISP>OLO>VOL-PRIVATE 

//0PUNC02  00  SYS0UT>B»0Ce«(RECFN-FB«LRECL»80»BLKSIZE-3200) 


FIGURE  5.3-15 
PROCEDURE INVCOU 
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//*  CTL  CN-1744t J0ATE*74144 

//INVOTV  PROC  ACNT**CN1744.INV*»VERS>'0* 

//INVOTY  EXEC  PGH>INVQTY,CONO«(7»LEI .REGI0N-120K 
//STEPLIB  DO  DSN«CACNT«.LCAOtOISP>SHRtVOL>(PRIVATE«RETAIN) 

//SYSUOUMP  DO  SYSOUT»A 

//SYSQUT  DO  SYSOUT-A 

//SORTLIB  DO  OSN-SYSl.SORTLIB.OISP-SHR 

//SORTWKOl  DO  UNIT>SYS0A«SPACE«(CYLt(5fl)tfC0NTlGI 

//S0RTWK02  DO  UNlT»SYSOA«SPACE«(CYLt( 5»1) » «CONTIG) 

//SORTWK03  DO  UN  I T«SYSOA « SPACE» ( CYL . < 5 . 1 ) » »CONT IG) 

//IMSTROl  DO  OSN«GACNT«.M.INVENTUVERS)  t01SP«OL0tUNIT«2400 
//PRINT04  DO  SYS0UT«A«0C6>(LRECL«133.BLKSIZE«1330»RECFH=FB) 

//PRINT05  DO  SYSOUT-A.0CB*fLRECL«133«BLKSIZE-1330tRECFH»FB) 

//W0RK05  DO  OSN<CSORT«UNIT«SYSOA.OISP<(NEW, DELETE)* 

//  SPACE* (CYL*( 5*1) t*CQNTIG)«0C6«(RECFH«FB*LRECL>80*BLKSIZE«7280) 

//0ATE06  OD  OSN«&ACNT..S.OATE»OISP«OLO*VOL*PRIVATE 
//WORK06  DO  OSN*£OSORT*UMT*SYSOA«OISP«(NEW*OELETE)* 

//  SPACE»ICYL«C5*l),*CCNTlG)»DCB-(RECFH-FBtLRECL«80*BLKSIZE*7280) 

//W0RK07  DO  OSN*&QTYAOJfUMT«SYSOA*OISP>(NEH»PASS)  * 

//  SPACE* ( CYL « ( 5*1) t*CCNTIG)«0CB*(RECFM«FB*LRECL*80*BLKSIZE=7280) 

//ICAROOl  DO  OONAME*AOJCC 


FIGURE  5.3-16 
PROCEDURE INVQTY 


//*  CTL  CN«1744t JOATE-74144 

//INVOIV  PROC  ACNT-'CN1744.INV».VERS«*0* 

//INVOIV  EXEC  PGM-1NV0IV»C0N0«(7»LEI*REGI0N«140K 
//STEPLIB  00  OSN>&ACNT..LOAO«OISP>SHRfVOL«(PRIVATE»RETAlN) 

//SYSUOUMP  00  SYSOUT>>A 

//SYSOUT  00  SYSOUT-A 

//SORTLIB  00  0SN*SYS1.S0RTLIB.0ISP-SHR 

//SORTWKOl  00  UNIT«SYS0A«SPACE-ICYL*(5,1I,«C0NTIG) 

//S0RTWK02  00  UNI T«SYSOA»SPACE>ICYL,( .CONTIG) 

//S0RTUK03  00  UN  1 T«SYSOA.SPACE«{CYL «f 5 *1 ) • tCONTIG ) 

//IMSTROl  00  0SN«&ACNT..M.INVENT(£VERS)»0ISP«OL0.UNIT«2400 
//PR1NT04  00  SYS0UT*AfCCB«(LRECL«133»BLKSIZE>1330,RECFH»FB) 

//WORK05  00  OSN-£SORT«UNIT«SYSOAtOISP«(NEM»OELETE)» 

//  SPACE- ICYL  t ( 5« 1 ) • tCCRTIG) t OCB- (RECFM-FB*  LRECL-80,BLKSIZE-7280) 

//W0RK06  00  0SN-£OS0RT,UNIT-SYS0A«01SP>tNEM»0ELETE), 

//  SPACE- (CyLtC5tl)t»C0NTIGI*0CB-(RECFM«FB«LRECL-80«BLKSIZE«7280) 

//0ATE06  00  OSN-£ACNT*«S.CATE»OISP-OLO«VGL-PRIVATE 

//W0RK07  00  OSN-£OSORT2tUNIT-SYSOA»OISP-(NEW»OELETEI» 

//  SPACE  «( CY  L » ( 5 » 1 1 f .CONT IG 1 1 OC  6- 1 RECFM-FB. LRECL-47*  BLKS 1 ZE-7285 I 

//WORK08  00  OSN-£REPORT*UNIT-SYSOAfOISP-(NEHtOELETE)t 
//  SPACE-fCYL»( 5 »l),«C6NTIG)»0CB-(RECFH-FBt LRECL-47* BLKSIZE-7285) 

//ICAROOl  00  OONAME-OIVCO 


FIGURE  5.3-17 
PROCEDURE  INVDIV 

» 
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//♦  CTL  CN-1 744, JDATE* 74120 
//INVEND  PROC  ACNT«»CN1744.INV» 

//VENOl  EXEC  PGM«VEN001, REGION* 120K, 

//  PARM»*  AC  TRANSIT  • 

//STEPLIB  DO  DSN>&ACNT«.LOAO,OISP*SHR,VOL*PRIVATE 
//SYSUOUMP  DO  SYSOUT-A 
//SYSOUT  DO  SYSOUT-A 

//SORTLIB  00  DSN>SYS1«S0RTL16,0ISP*SHR 
//SORTWKOl  00  UNIT*SYSDA,SPACE»(CYL,(5,1) ,,CONTIG) 
//SORTWK02  DO  UN IT»SYSDA,SPACE»(CYL,( 5, 1) , ,CONTIG) 
//SORTWK03  DO  UN I T>SYSDA .SPACE- (CYL, ( 5 , 1 I , ,CONT IG ) 
//PRINTOl  00  SYSOUT-A, DCB-IRECFN-F,BLKSIZE-133) 
//IMSTROl  DO  DSN-6ACNT..N. VENDOR, DISP-OLO,VOL-PRIVATE 
//CAR002  00  OONAME-VENOCO 

//WORK05  00  OSN-USORT,lNIT-SYSOA,OISP-(NEW,OELETE), 
//  SPACE-(CVL,(5,1I,,CCNTIG), 

//  0CB=(RECFN»FB,LRECL-51,BLKSIZE=7242) 

//WORK06  DO  OSN-SOSORT, tNIT-SYSDA,OISP-(NEW, DELETE) , 
//  SPACE»(CYL,(5,1),,CCNTI6), 

//  DCB»(RECFM-FB,LRECL-51,BLKSIZE»7242) 

//VEND2  EXEC  PGM-I EBI SAM, PARH- • PR INTL ,N' 

//SYSPRINT  DO  SYSOUT-A 

//SYSUTl  DO  OSN»£ACNT.«M«VENOOR,DISP-OLD,VOL»PRIVATE 
//SYSUT2  00  SYSOUT-A 


FIGURE  5.3-18 
PROCEDURE INVEND 
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//*  CTL  CN*OALLAS  TRANSIT* JOATE-73026 

//INVBKUP  PROC  ACNT««TRANSIT.INV* *BCNT«*CN1744.INV* 

//INVBKUP  EXEC  PGM- IEHOASCR*REGION«60K 
//SVSPRINT  00  SVSOUT-A 

//OISK  00  UNIT«2314.01SP-OLO*VOL-(PR1VATE*SER«ACTINV) 

//TAPE  00  0SN«&ACNT..SAVE(«l)*UNIT-(2400-3*«0EFER)*LABEL»(*SU* 
//  01SP-(NEW*CATLG«0ELETE) 

//SYSIN  00  OSN-C.BCNT.«S.CUfCTLBKUP)*OISP-SHR*VGL«PRIVATE 


FIGURE  5.3-19 
PROCEDURE INVBKUP 
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//♦  CTL  CN-1 744, JOAT £*74091 

//INVR30  PROC  ACNT«*CN1744«INV* ,VERS*'0* 

//1NVR30  EXEC  PGH*RP01OC,C0N0*(7, LE) ,REGI0r^66K, 

//  PARM*'  AC  TRANSIT  • 

//STEPLIB  00  0SN-CACNT.«LCA0,01SP-SHR,V0L*IPR1VATE, RETAIN) 
//SYSUOUMP  00  SYSOUT«A 

//PRINTOl  DO  SYS0UT«A,0Ce*IRECFH«Fe,LRECL*133,BLKSIZE*7182) 
//IMSTRll  00  OSN=GACNT..M«INVACTV,DISP*OLD,VOL*(PRIVATE, RETAIN) 
//1MSTR12  00  OSN*CACNT..M.TRANOISK(&VERS.),OISP*OLD,VOL>PRIVATE 


FIGURE  5.3-20 
PROCEDURE  INVR30 
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//•  CTL  CN-1744*J0ATE«74091 
//INVR32  PROC  ACNT«*CN1744.INV* 

//1NVR32  EXEC  PGM>RP060B«CON0»( 7* LE) f REGION-112K, 

//  PARH-*  AC  TRANSIT  • 

//STEPLIB  DD  OSN«&ACNT«.LOAO,OISP-SHR.vaL«(PRIVATE«RETAIN) 

//SYSOUT  DO  OUMNY 
//SYSUOUNP  00  SVSOUT>A 

//PRINTOl  00  SYS0UT«A»0CB«IRECFH-FB«LRECL>133»BLKS1ZE>7182) 

//U0RK02  00  OSN«&CSRTPO»OISP>INEH*OELETEI*UN1T-SYSOA» 

//  SPACE«(CYLt(5tl)*tC0NTIG}t0CB«(RECFH>FBtLRECL«70tBLKSIZE>7280) 

//SORT06  00  OSN«&SSORT«OISP>(NEW»OELETEI»UNIT«SYSOAt 

//  SPACE«(CYL, ( 5* li t •CONTIG) f 0C8«( RECFM«FB*  LRECL»70f 6LKSI ZE«7280 ) 

//IMSTROl  00  OSN*CACNT.*H.POTRANS»OISP«OLOtVOL«(PRIVATE»RETAIN) 

//IMSTR03  00  OSN»&ACNT«.M«VENOORtOISP«OLO»VOL«IPRIVATE«RETAIN) 

//SORTLIB  00  0SN«SYS1.S0RTLIB,0ISP3SHR 

//SORTMKOl  00  UNIT>SYS0A»SPACE*(CYL.(5f DtfCONTlGI 

//S0RTWK02  00  UNIT-SYSOA«SPACE«ICYLtf 5tl) t »CONTIGI 

//S0RTMK03  00  UN IT«SYSOAtSPACE«( CYLt ( 5 t 1 ) t t CONTIG ) 


FIGURE  5.3-21 
PROCEDURE INVR32 
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//*  CTL  CN«1744. JOATE*740S1 
//INVR34  PROC  ACNT*'CN17A4.INV 
//INVR34  EXEC  PGM»RP016C tCOND=< 7 , 
//  PARM-*  AC  TRANS 

//STEPLIB  00  OSN>£ACNT..LCAOf OISP 
//SYSUOUNP  00  SYSOUT*A 
//ITRANOl  00  OSN«&ACNT..M.INVACTV 
//INSTROl  00  OSN-CACNT..M.TRANOI 
//PRINTOO  00  SYSOUT»A,OCfr»(RECFM 
//PRINTOl  00  OUHHY,OCB«(RECFM« 

//PR1NT02  00  OUNHYfOCe«(RECFH« 

//PRINT03  00  SYSOUT*AtOCB>(RECFH 
//PRINT04  00  SYSOUT>A*OCB«(RECFM 


,VERS«'0* 

LE) »REGI0N*70K« 

IT  • 

«SHR,VOL>(PRIVATEt RETAIN) 

tOISP«OLO,VOL>(PRlVATE,RETAIN) 

SKiCVERS. ),OISP=OLO,VOL«PRIVATE 

»FB,LRECL*133,BLKSIZE*7182) 

F,LRECL«133,BLKSIZE«133) 

F«LRECL«133.BLKSIZEsl33) 

*FB»LRECL«133tBLKSIZE«7182) 

«FB»LRECi.«133*BLKSIZE>7182) 


FIGURE  5.3-22 
PROCEDURE  INVR34 
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6.0  IIWENTORY  SYSTEM  FILES 

The  major  files  used  in  the  Inventory  System  are  listed  in  Table  6.0-1. 
Their  relationship  in  terms  of  processing  is  shown  in  Figure  6.0-1. 

Each  file  is  described  in  a File  Specification  Sheet  and  in  a Record 
Specification  Sheet.  The  File  Specification  Sheet  contains: 

(a)  File  Name:  This  is  the  common  user  name  for  the  file. 

(b)  FD  Name:  The  COBOL  name  of  the  file,  which  provides  an 

identity  common  to  all  programs.  This  name  is  used  to 
copy  the  file  description  from  the  program  copy  library. 

(c)  Data  Set  Name:  This  is  the  name  used  to  reference  the 

file  in  JCL  commands. 

(d)  Number  of  Formats:  The  number  of  record  types  in  the  file. 

(e)  Record  Size:  The  number  of  characters  in  a record  of  any 

type  in  the  file. 

(f)  Record  Formats:  Each  record  in  the  file  is  referenced  by  a 

format  or  transaction  code,  when  appropriate,  and  the 
record  name.  The  maximum  and  minimum  number  of  each  type 
of  record  in  the  file  is  shown,  when  appropriate. 

(g)  Program  Use:  Each  program  that  uses  the  file  is  identified 

by  name  and  number.  The  use  of  the  file,  as  input  and/or 
output,  and  the  COBOL  name  by  which  the  file  is  referenced 
in  each  program  are  described. 

The  Record  Specification  Sheet  contains: 

(a)  Record  Name:  This  is  the  common  user  name  for  the  record. 

(b)  File  Name:  This  is  the  common  user  name  for  the  file  that 

contains  the  record.  It  is  provided  as  a cross-reference. 

(c)  COBOL  Name  of  Record:  The  COBOL  name  of  the  record  is  the 

name  given  to  the  structure  used  to  define  the  record. 

(d)  Record  Format  Code:  The  format  or  transaction  code  by  which 

each  type  of  record  is  referenced. 

(e)  Record  Length:  The  number  of  characters  in  the  record. 
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(f)  a description  of  each  data  item  in  the  record  in  terms  of: 


(1)  initial  character  position  of  the  field  containing  the 
item; 

(2)  the  number  of  characters  in  the  field; 

(3)  the  type  of  characters  in  the  field  where: 

9 represents  digits, 

A represents  alphabetic  characters,  and 
X represents  alphanumerics; 

(4)  the  COBOL  name  of  the  field;  and 

(5)  a description  of  the  data  item. 

Each  subsection,  as  specified  in  Table  6.0-1,  describes  a file. 

A brief  description  of  the  purpose  of  each  file  is  included. 
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FIGURE  6.0-1 

SIMS  INVENTORY  SYSTEM  FILES 
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TABLE  6.0-1 


SIMS  INVENTORY  SYSTEM  FILES 


Subsection 

Number 

File  Name 

Data  Set  Name 

6.1 

Inventory  Master  File 

CN1744.INV.M.INVENT(  ) 

6.2 

Inventory  Class  Master  File 

CN1744.INV.M.INVCLASS(  ) 

6.3 

Inventory  Active  Master  File 

CN1744.INV.M.INVACTV 

6.4 

Standard  Transaction  File 

5.INVTRN 

6.5 

Temporary  Storage  Transaction 

CN1744.INV.M.SRTEMP 

File 

6.6 

Current  Transaction  File 

CN1744.INV.M.TRANDISK(  ) 

6.7 

Transaction  History  File 

CN1744.INV.M.TRANTAPE(  ) 

6.8 

Temporary  Suspense  File 

CN1744. INV.M. INVSUSPN 

6.9 

Suspense  File 

CN1744.INV.SUSPFILE(  ) 

6.10 

Purchase  Order  Transaction 

CN1744. INV.M. POTRANS 

File 

6.11 

Inventory  Constants  File 

CN1744.INV.S. CONST 

6.12 

Inventory  Control  File 

CN1744.INV.S.CTL 

6.13 

Vendor  Reference  File 

CN 1 7 44 . IN V . M . VENDOR 

6.14 

Report  Date  File 

CNl 744. INV.S. DATE 

6.15 

Report  Date  Card  File 

DATECD 

6.16 

ACTD  Card  Input  File 

TRANCD 

6.17 

DTS  Tape  Input  File 

DTSTRAN 

6.18 

Part  History  Select  Gard  File 

SYSIN 

6.19 

File  Records  Select  Card  File 

SYS  IN 

6.20 

Vendor  Select  Card  File 

SYSIN 
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TABLE  6.0-1  (Concluded) 


SIMS  INVENTORY  SYSTEM  FILES 


Subsection 


er 

File  Name 

Data  Set  Name 

6.21 

Price  Correction  Card  File 

PCTRAN 

6.22 

Inventory  Master  Card  File 

SYS0UT=B 

6.23 

Quantity  Adjustment  Card  File 

ADJCD 

6.24 

Division  Stock  Reconciliation 
Card  File 

DIVCD 

6.25 

Quantity  Adjustment  Transaction 
File 

&QTYADJ 

6.26 

Value  Adjustment  Transaction 
File 

&VALADJ 

6.27 

Vendor  File  Startup  Card  File 

VENDCD 

Note:  ( ) indicates  that  the  file  is  a generation  data  set. 
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6.1  Inventory  Master  File  (M. INVENT ( )) 

The  Inventory  Master  File  is  a tape  file,  and  is  the  central  file 
of  the  Inventory  System.  It  contains,  for  each  materials  item  in  the 
system,  records  of  purchase  orders,  stock  on-hand,  and  monthly  trans- 
action activity.  Materials  items  in  the  system  include  both  items 
under  inventory  control  and  uncontrolled  items. 

The  Inventory  Master  File  is  a generation  data  set.  Three  versions 
are  saved  on  tape  at  all  times.  These  versions  represent  the  results 
of  the  three  most  recent  system  executions. 

File  and  record  specifications  are  given  in  Tables  6.1-1  through 
6.1-9. 
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TABLE  6.1-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Inventory  Master  File 

FD  NAME:  AINFDD2 

DATA  SET  NAME;  M. INVENT ( ) 

NUMBER  OF  RECORD  FORMATS:  9 RECORD  SIZE:  60  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  hy:  House  Inventory  (item)  Number 

Record  Format  Code 
Record  Date 


RECORD  FORMATS 


FORMAT 

MAX.  NO. 

MIN.  NO. 

CODE 

RECORD  NAME 

PER  PART 

PER  PART 

i+0 

Header  Record 

1 

1 

Ul 

Item  Description  Record  1 

1 

0 

i+2 

Item  Description  Record  2 

1 

0 

h9 

Division  Stock  Status  Record 

20 

0 

50 

Reorder  Status  Record 

1 

1 

53 

Stock  Status  Record 

1 

1 

55 

Purchase  Order  Status  Record 

20 

0 

56 

Purchase  Order  Accounting  Record 

20 

0 

60 

Monthly  Activity  Record 

16 

0 

PROGRAM  USE 


PROGRAM 

I DENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


DG300 

DG300 

RPOIOD 

RP013 

RPOlU 

RPOIT 

RP018 

RP022 

INVEST 


Inventory  Master  File  Edit/Update  R 

Inventory  Master  File  Edit/Update  W 

Requested  Materials  Transaction  History  R 

Report  Generator 

Unfilled  Purchase  Orders  Report  Generator  R 

Vendor  Performance  Report  Generator  R 

Stock  Status  Report  Generator  R 

Low  Usage  Materials  Items  Report  R 

Generator 

Outstanding  Piarchase  Orders  Report  R 

Generator 

Inventory  Master'  File  List  Program  R 


INPUT-PART-MASTER 
OUTPUT-PART-MASTER 
INPUT-PART -ivIASTER 

ACTIVE-STATUS-FILE 

ACTIVE-STATUS-FILE 

ACTIVE-STATUS-FILE 

ACTIVE-STATUS-FILE 

ACTIVE-STATUS-FILE 

MSTR-FILE 
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TABLE  6.1-1  (Concluded) 


PROGRAM 

PROGRAM  COBOL 

IDENT . 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

IWVVADJ 

Inventory  Value  Adjustment  Program 

R 

INTAPE 

INVCADJ 

Inventory  Class  Master  File 
Adjustment  Program 

R 

INTAPE 

INVCOUTLC 

Inventory  Master  Card  Generator 
Program 

R 

I-INV-MSTR 

INVQTY 

Inventory  Quantity  Adjustment 
Program 

R 

I-INV-MSTR 

INVDIV 

Division  Stock  Reconciliation 
Program 

R 

I-INV-MSTR 
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TABLE  6.1-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Header  Record 

FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-HEADER 

RECORD  FORMAT  CODE:  hO 

RECORD  LENGTH:  60  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

ll+ 

9 

X(9) 

FILLER 

23 

2 

XX 

I-ISS-UNIT-MSRE 

Unit  of  Issue 

25 

15 

X(15) 

I-ITEM-NAME 

Item  i^ame 

4o 

9V9(3) 

I - ISS -MARKUP -FACTOR 

Markup  Factor  (A) 

hh 

5 

9V9(i+) 

I- SALES -TAX-FACTOR 

Sales  Tax  Factor 

k9 

6 

9(6) 

I-LAST-ACT-DATE 

Date  Header  Record 

Last  Updated 

55 

6 

X(6) 

FILLER 

TOTAL 

6o 

(a)  Not  Used 
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TABLE  6.1-3 


RECORD  SPECIFICATION 

RECORD  NAME:  Item  Description  Record 

FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-DSCRPT 

RECORD  FORMAT  CODE;  kl,  k2 
RECORD  LENGTH;  60  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

lU 

9 

X(9) 

FILLER 

23 

30 

X(30) 

I-INV-PART-DESC 

First  30  Characters 
of  Item  Description 
(if  more  than  30, 
a k2  record  is 
present ) 

53 

6 

X(6) 

I-INV-DESC-DATE 

Date  of  Last  Descrip- 
tion Update 

59 

2 

XX 

FILLER 

TOTAL  60 
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TABLE  6.1-U 


RECORD  SPECIFICATION 


RECORD  NAME:  Division  Stock  Status  Record 

FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-DIV 

RECORD  FORMAT  CODE:  1+9 

RECORD  LENGTH:  60  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

lU 

2 

XX 

I-DIV 

Division  Number 

16 

6 

x(6) 

I-DIV-DATE-EST 

Date  Record  Established 

22 

1 

X 

FILLER 

23 

5 

9(5) 

I-STOCK-LEVEL 

Division  Stock  Level 

28 

33 

X(33) 

FILLER 

TOTAL 

60 
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TABLE  6.1-5 


RECORD  SPECIFICATION 


RECORD  NAME:  Reorder  Status  Record 


FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-REORDER 


RECORD 

FORMAT 

CODE: 

; 50 

RECORD 

LENGTH; 

60 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

lU 

9 

X(9) 

FILLER 

23 

1+ 

x(i+) 

I-REORDER-PT 

Reorder  Point 

27 

2 

99 

I -REORDER-NTCE- INTRVL 

Reorder  Notice  Interval 
(A) 

29 

3 

999 

I-LOW-USE-LIMIT 

Low  Usage  Interval  (A) 

32 

6 

9(6) 

I-REORDER-NTCE-DATE 

Date  of  Last  Reorder 
Notice 

38 

2 

99 

I-REORDER-NTCE-NBR 

Reorder  Notice  Number 

i+0 

6 

9(6) 

I-LAST-UPDATE 

Date  of  Last  Record 
Update 

1+6 

6 

9(6) 

I-RCNT-ISS-DATE 

Date  of  Last  Issue 

52 

7 

S9(5)V99 

I-RCNT-ISS-QTY 

Last  Issue  Quantity 

59 

TOTAL 

2 

6o 

XX 

FILLER 

(a)  Not  Used 
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TABLE  6.1-6 


RECORD  SPECIFICATION 


RECORD  NAME:  Stock  Status  Record 


FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-STOCK-STATUS 


RECORD 

FORMAT 

CODE: 

: 53 

RECORD 

LENGTH: 

60 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

lU 

9 

X(9) 

FILLER 

23 

7 

S9(5)V99 

I-OH-QTY 

On-Hand  Quantity 

30 

7 

S9(5)V99 

I-OO-QTY 

On-Order  Quantity 

37 

8 

S9(l+)V9(i+)l-A7-PRICE 

Average  Unit  Price 

i+5 

7 

S9(5)V99 

I-BGNG-OH-QTY 

Beginning  On-Hand 

Quantity  (A) 

52 

9 

S9(7)V99 

I-BGNG-OH-VAL 

Beginning  On-Hand  Value 

TOTAL 

6o 

(A)  Not 

Used 
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TABLE  6.1-1 


RECORD  SPECIFICATION 


RECORD  NAME:  Purchase  Order  Status  Record 

FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I -INV- OPEN -ORDER- STATUS 

RECORD  FORMAT  CODE;  55 

RECORD  LENGTH;  60  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

x(ll) 

I-INV-PART-NBR 

Item  Number 

Ih 

6 

9(6) 

I-PO-DATE 

Purchase  Order  Date 

(yymmdd) 

20 

3 

X(3) 

FILLER 

23 

7 

S9(5)V99 

I-PO-QTY 

Quantity  Ordered 

30 

8 

9(J+)V9(ii) 

I-ISSUE-PRICE 

Purchase  Order  Price 

38 

5 

X(5) 

I-DLVRY-DATE 

Estimated  Delivery 

Date  (MMDDY) 

k3 

5 

X(5) 

I-VNDR-ID-CODE 

Vendor  Code 

U8 

T 

S9(5)V99 

I-ACC-RPCT 

Quantity  Received 

55 

6 

9(6) 

I-PO-NBR 

Purchase  Order  Number 

TOTAL 

6o 
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TABLE  6.1-8 


RECORD  SPECIFICATION 


RECORD  NAME:  Purchase  Order  Accounting  Record 

FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-OPEN-ORDER-ACCT 

RECORD  FORMAT  CODE:  56 

RECORD  LENGTH:  60  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

li+ 

6 

9(6) 

I-PO-DATE 

Purchase  Order  Date 

(YYMMDD) 

20 

3 

X(3) 

FILLER 

23 

U 

X(U) 

I-ACCOUNT-NBR 

Account  Number 

27 

2 

XX 

I-SUB-ACCOUNT 

Sub-account  Number 

29 

U 

X(U) 

I-WORK-ORDER-NBR 

Work  Order  Number 

33 

1+ 

X(U) 

I-EQUIP-NBR 

Vehicle  Number 

37 

1 

X 

I-FLEET-CHARGE 

Fleet  Charge 

38 

23 

X(23) 

FILLER 

TOTAL 

60 
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TABLE  6.1-9 


RECORD  SPECIFICATION 


RECORD  NAME:  Monthly  Activity  Record 


FILE  NAME:  Inventory  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-MONTHLY 

RECORD  FORMAT  CODE;  60 
RECORD  LENGTH:  60  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

11 

X(ll) 

I-INV-PART-NBR 

Item  Number 

Ih 

9(M 

I-INV-YR-MO 

Record  Date  (YYMM) 

18 

5 

X(5) 

FILLER 

23 

8 

S9(6)V99 

I-RCPT-VAL-MTD 

Monthly  Value  of 

Receipts 

31 

8 

S9(6)V99 

I-ISS-VAL-MTD 

Monthly  Value  of  Issues 

39 

8 

S9(6)V99 

I-ADJ-MTD 

Monthly  Value  of  Adjust' 

ments 

LT 

8 

S9(6)V99 

I-ISS-QTY-MTD 

Monthly  Quantity  Issued 

55 

6 

X(6) 

FILLER 

TOTAL 

60 

6-16 


6.2  Inventory  Class  Master  File  (K. INVCLASS(  )) 


The  Inventory  Class  Master  File  is  a disk  file.  It  contains,  for 
each  materials  class  in  the  system,  records  of  monthly  activity  against 
that  class. 

The  Inventory  Class  Master  File  is  a generation  data  set.  Three 
versions  are  saved  on  disk  at  all  times.  These  versions  represent  the 
results  of  the  three  most  recent  system  executions. 

File  and  record  specifications  are  given  in  Tables  6.2-1  through 
6.2-3. 
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TABLE  6.2-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  , Inventory  Class  Master  File 

FD  NAME:  AINFDD2 

DATA  SET  NAME:  M.INVCLASS(  ) 

NUMBER  OF  RECORD  FORMATS:  2 RECORD  SIZE:  60  Characters 


FILE  ORGANIZATION;  Class  Number 

Record  Format  Code 
Record  Date 


RECORD  FORMATS  : 


FORMAT 

CODE  RECORD  NAME 


MAX.  NO.  MIN.  NO. 

PER  CLASS  PER  CLASS 


53  Stock  Status  Record 

60  Monthly  Activity  Record 


1 1 
16  0 


PROGRAM  USE 


PROGRAM 

I DENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


DG300 

DG300 

RP020 

INVCADJ 

INVCADJ 


Inventory  Master  File  Edit/Update 
Inventory  Master  File  Edit/Update 
Inventory  Activity  Report  Generator 
Inventory  Class  Master  File  Adjustment 
Program 

Inventory  Class  Master  File  Adjustment 
Program 


R INPUT- CLASS -MASTER 

W OUTPUT-CLASS-MASTER 
R INV-FILE 
R INCLASS 

W OUTFILE 
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TABLE  6.2-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Stock  Status  Record 

FILE  NAME:  Inventory  Class  Master  File 

COBOL  NAME  OF  RECORD:  I-INV-STOCK-STATUS 

RECORD  FORMAT  CODE;  53 
RECORD  LENGTH:  60  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

1 

X 

FILLER 

'C 

l4 

3 

X(3) 

I-INV-ALT-CLASS 

Class  Code 

7 

l6 

X(l6) 

FILLER 

23 

7 

S9(5)V99 

I-OH-QTY 

On-Hand  Quantity  (A) 

30 

7 

S9(5)V99 

I-OO-QTY 

On-Order  Quantity  (A) 

37 

8 

9(U)V9(i+) 

I-AV-PRICE 

Average  Unit  Price  (A) 

h5 

7 

S9(5)V99 

I-BGNG-OH-QTY 

Beginning  On-Hand  Quantity 

(A) 

52 

2_ 

S9(7)V99 

I-BGNG-OH-VAL 

Beginning  On-Hand  Value 

TOTAL 

6o 

(a)  Not  Used 
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TABLE  6.2-3 


RECORD  SPECIFICATION 


RECORD  NAME:  Monthly  Activity  Record 

FILE  NAME:  Inventory  Class  Master  File 

COBOL  NAME  OF  RECORD;  I-INV-MONTHLY 


RECORD 

FORMAT 

CODE: 

6o 

RECORD 

LENGTH: 

60 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-INV-CDE 

Record  Format  Code 

3 

1 

X 

FILLER 

'C 

U 

3 

X(3) 

I-INV-ALT-CLASS 

Class  Code 

7 

7 

X(7) 

FILLER 

lU 

h 

9(M 

I-INV-YR-MO 

Record  Date  (YYMM) 

18 

5 

X(5) 

FILLER 

23 

8 

S9(6)V99 

I-RCPT-VAL-M'D 

Monthly  Value  of  Receipts 

31 

8 

S9(6)V99 

I-ISS-VAL-MTD 

Monthly  Value  of  Issues 

39 

8 

S9(6)V99 

I-ADJ-MTD 

Monthly  Value  of  Adjustments 

hi 

8 

S9(6)V99 

I-ISS-QTY-NETD 

Monthly  Quantity  Issued  (A) 

55 

6 

X(6) 

FILLER 

TOTAL  60 


(a)  Not  Used 
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6. 3 Inventory  Active  Master  File  (M.INVACTV) 


The  Inventory  Active  Master  File  is  a disk  file.  It  contains,  for 
each  materials  item  against  which  transactions  were  processed  during 
the  current  system  run,  all  records  from  the  Inventory  Master  File. 

This  file  reflects  the  status  of  the  items  as  a result  of  the  most 
recent  inventory  update  process. 

File  and  record  specifications  are  given  in  Table  6.3-1. 


TABLE  6.3-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FD  NAME:  AINFDD2 

DATA  SET  NAME:  M.INVACTV 

NUMBER  1 

OF  RECORD  FORMATS:  9 RECORD  SIZE 

: 60  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  by:  House  Inventory  (Item)  Number 

Record  Format  Code 
Record  Date 

RECORD  FORMATS: 

FORMAT 

CODE 

RECORD  NAME 

MAX.  NO.  MEN.  NO. 

i+0 

Header  Record 

1 

1 

1+1 

Item  Description  Record  1 

1 

0 

1+2 

Item  Description  Record  2 

1 

0 

1+9 

Division  Stock  Status  Record 

20 

0 

50 

Reorder  Status  Record 

1 

1 

53 

Stock  Status  Record 

1 

1 

55 

Purchase  Order  Status  Record 

20 

0 

56 

Purchase  Order  Accounting  Record 

20 

0 

60 

PROGRAM 

PROGRAM 

Monthly  Activity  Record 

USE 

16 

0 

PROGRAM  COBOL 

I DENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

DG300 

Inventory  Master  File  Edit/Update 

W 

OUTPUT-ACTIVE- INVENTORY 

RPOll 

Reorder  Notification  Report  Generator 

R 

ACTIVE-STATUS-FILE 

RPOIOC 

Materials  Transaction  History  Report 
Generator 

R 

INPUT-PART-MASTER 

RP016 

Division  Stock  Replacement  Report 
Generator 

R 

ACTIVE-FILE 

Note:  The  Record  Names,  Format  Codes,  and  Specifications  are  the 

same  as  for  the  Inventory  Master  File,  M.INVENT(  ) (see 
Section  6.1). 
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6.4  Standard  Transaction  File  (&INVTRN) 

The  Standard  Transaction  File  is  a temporary  disk  file.  It  contains 
80-character  inventory  transactions  in  a format  acceptable  to  the  In- 
ventory System.  At  ACTD  and  DTS,  transit-specific  transactions  are 
converted  by  the  User  Input  Processor  Program,  DA200,  and  placed  in  this 
file. 

File  and  record  specification  are  given  in  Tables  6.4-1  through 
6.4-12. 
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TABLE  6.U-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


•FILE  NAME:  Standard  Transaction  File 

FD  NAME:  INTRAN2 

DATA  SET  NAME:  &INVTRN 

NUMBER  OF  TRANSACTIONS:  29 

FILE  ORGANIZATION:  Random  Order 


RECORD  SIZE:  80  Characters 


RECORD  FORMATS: 


TRANSACTION 


CODE 

RECORD  NAME 

MAX.  NO. 

MIN. 

OA,  ON, 

OX 

Purchase  Order  Record 

U 

0 

6a,  6n 

Materials  Receipts  Record 

U 

0 

TA,  TN 

Vendor  Return  Record 

U 

0 

8a,  8n, 

lA, 

IN  Materials  Issue  Record 

U 

0 

2A,  2N, 

3A, 

3N  Adjustment  Record 

U 

0 

UA,  i+N, 

9A, 

9N 

AA,  AX 

Item  Characteristics  Record 

u 

0 

BA,  BX 

Item  Description  Record 

u 

0 

DA,  DX 

Division  Stock  Record 

u 

0 

EA 

Average  Unit  Price  Change  Record 

u 

0 

CA,  CX 

Vendor  Name  Record 

u 

0 

FA 

System  Constants  Record 

u 

0 

PROGRAM 

USE 

PROGRAM 

IDENT. 

DA200 

DA300 


PROGRAM  NAME 

User  Input  Processor 
Data  Acceptance 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 

W 0-TRANS-FILE 
R I-TRANS-FILE 
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TABLE  6.U-2 


RECORD  SPECIFICATION 


RECORD  NAME;  Purchase  Order  Record 
FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-PO 

TRANSACTION  CODE:  0A,  0N,  0X 

RECORD  LENGTH:  80  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

1+ 

6 

9(6) 

I-TR-PO-NBR 

Purchase  Order  NiAmber 

10 

5 

9(5) 

I-TR-VNDR-ID 

Vendor  Code 

15 

3 

X(3) 

FILLER 

18 

6 

X(6) 

I-TR-PO-DTE 

Purchase  Order  Date 

2k 

1 

X 

FILLER 

25 

6 

x(6) 

I-TR-DLVY-DTE 

Estimated  Delivery  Date 

31 

7 

x(7) 

FILLER 

38 

11 

X(ll) 

I-TR-PO-PART-NBR 

Item  Nimiher 

kg 

2 

XX 

I-TR-PO-UNIT-MSRE 

Unit  of  Issue 

51 

7 

9(5)V99 

I-TR-PO-QTY 

Purchase  Order  Quantity 

58 

8 

9{k)vg{k) 

I-TR-PO-PRICE 

Purchase  Order  Price 

66 

k 

X(U) 

I-TR-ACCT-NBR 

Account  Number 

70 

2 

XX 

I-TR-SUB-ACCT 

Sub-account  Number 

72 

L 

X(U) 

I-TR-WO-NBR 

Work  Order  Number 

76 

1+ 

X(U) 

I-TR-EQUIP-NBR 

Vehicle  Number 

80 

1 

X 

I-TR-FLT-CHG 

Fleet  Charge 

TOTAL 

80 
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TABLE  6.4-3 


RECORD  SPECIFICATION 

RECORD  NAME:  Materials  Receipt  Record 

FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-RCPT 

TRANSACTION  CODE;  6A,  6N 
RECORD  LENGTH;  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

k 

6 

9(6) 

I-TR-RC-PO-NBR 

Purchase  Order  Number 

10 

8 

X(8) 

FILLER 

18 

6 

x(6) 

I-TR-RC-DTE 

Receipt  Date 

2U 

l4 

X(l4) 

FILLER 

38 

11 

x(ll) 

I-TR-RC-PART-NBR 

Item  Number 

49 

2 

XX 

I-TR-RC-UNIT-MSRE 

Unit  of  Issue 

51 

7 

9(5)V99 

I-TR-RC-QTY 

Quantity  Received 

58 

23 

X(23) 

FILLER 

TOTAL 

80 
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TABLE  6.h-k 


RECORD  SPECIFICATION 


RECORD  NAME:  Vendor  Return  Record 


FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-VNDR-RETURN 

TRANSACTION  CODE:  7A,  TN 


RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

h 

6 

X(6) 

I-TR-SHIP-NTC-NBR 

Shipping  Report  Number 

10 

5 

X(5) 

I-TR-VR-VNDR-ID 

Vendor  Code 

15 

3 

X(3) 

FILLER 

18 

6 

X(6) 

I-TR-RETURN-DTE 

Vendor  Return  Date 

2k 

1 

X 

FILLER 

25 

6 

X(6) 

I-TR-VR-PO-NBR 

Purchase  Order  Number 

31 

3 

X(3) 

FILLER 

3i+ 

k 

X(U) 

I-TR-VR-ACCT-NBR 

Account  Number  (A) 

38 

11 

X(ll) 

I-TR-VR-PART-NBR 

Item  Number 

k9 

2 

XX 

I-TR-VR-UNIT-MSRE 

Unit  of  Issue 

51 

7 

9(5)V99 

I-TR-VR-QTY 

Quantity  Returned 

58 

23 

X(23) 

FILLER 

TOTAL 

80 

(a)  Not  Used 
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TABLE  6.U-5 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Issue  Record 

FILE  NAME:  Standard  Transaction  File 


COBOL 

NAME  OF  RECORD:  I-TR- 

-MAT-ISS-CR 

TRANSACTION  CODE: 

8a,  8n, 

lA,  IN 

RECORD 

LENGTH:  80 

Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

8 

x(8) 

FILLER 

11 

11 

X(ll) 

I-TR-IC-PART-NBR 

Item  Nimiher 

22 

7 

9(5)V99 

I-TR-IC-QTY 

Quantity  Issued 

29 

2 

XX 

I-TR-IC-UNIT-MSRE 

Unit  of  Issue 

31 

19 

X(19) 

FILLER 

50 

6 

X(6) 

I-TR-IC-DTE 

Issue  Date 

56 

2 

XX 

I-TR-IC-GRP 

Vehicle  Group  Code 

58 

2 

XX 

I-TR-IC-UNIT 

Unit  Code 

60 

2 

XX 

I-TR-IC-WR 

Work/Reason  Code 

62 

2 

XX 

FILLER 

61+ 

1+ 

X(U) 

I-TR-IC-WO 

Work  Order  N+imber 

68 

1+ 

x(i+) 

I-TR-IC-ACCT 

Account  Number 

72 

2 

XX 

I-TR-IC-SUB 

Sub-account  Number 

71+ 

1 

X 

I-TR-IC-EQUIP 

Equipment  Division 

75 

1+ 

X(l+) 

I-TR-IC-VEH 

Vehicle  Number 

79 

1 

X 

I-TR-IC-FLT 

Fleet  Charge 

80 

1 

X 

I-TR-IC-DIV 

Issue  Division 

TOTAL 

80 
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TABLE  6.U-6 


RECORD  SPECIFICATION 


RECORD  NAME;  Adjustment  Record 
FILE  NAME;  Standard  Transaction  File 
COBOL  NAME  OF  RECORD:  I-TR-ADJ 


TRANSACTION  CODE:  2A,  2N,  3A,  3N,  UA,  UN,  9A,  9N 


RECORD 

LENGTH:  80 

Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

I-TR-VOUCHER 

Adjustment  Voucher  Number 

9 

6 

9(6) 

I-TR-ADJ-DATE 

Adjustment  Date 

15 

6 

X(6) 

FILLER 

21 

11 

X(ll) 

I-TR-ADJ-PART-NBR 

Item  N+omber 

32 

2 

XX 

I-TR-UNIT-MSRE 

Unit  of  Issue  (A) 

3I+ 

7 

9(5)V99 

I-TR-ADJ-QTY 

Adjustment  Quantity  (B) 

Ul 

1+0 

x(i+o) 

FILLER 

TOTAL 

80 

(a)  Unit  of  Issue  not  required  for  9A  or  9N. 

(B)  For  9A  and  9N,  this  field  contains  a value  adjustment. 
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TABLE  6.U-7 


RECORD  SPECIFICATION 


RECORD  NAME;  Item  Characteristics  Record 
FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-REC 

TRANSACTION  CODE:  AA,  AX 

RECORD  LENGTH:  80  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

X(6) 

I-TR-DTE 

Transaction  Date 

9 

11 

X(ll) 

I-TR-PART-NBR 

Item  N+jmber 

20 

15 

X(15) 

I-TR-NAME 

Item  Name 

35 

2 

XX 

I-TR-UNIT-MSRE 

Unit  of  Issue 

37 

1+ 

x(i+) 

I-TR-REORDER-PT 

Reorder  Point 

Ul 

5 

X(5) 

FILLER 

1+6 

5 

9V9(1+) 

I-TR-TAX-FACT 

Sales  Tax  Factor 

51 

1+ 

9V9(3) 

I-TR-MARKUP 

Markup  Factor  (A) 

55 

26 

X(26) 

FILLER 

TOTAL 

8o 

(A)  Not 

Used 
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TABLE  6.1+-8 


RECORD  SPECIFICATION 


RECORD  NAME:  Item  Description  Record 
FILE  NAME:  Standard  Transaction  File 
COBOL  NAME  OF  RECORD):  I-TR-DSCRPT 


TRANSACTION  CODE:  BA , BX 


RECORD 

LENGTH: 

80  Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

I-TR-DTE 

Transaction  Date 

9 

11 

X(ll) 

I-TR-PART-NBR 

Item  Number 

20 

60 

x(6o) 

I-TR-DSCRPTN 

Item  Description 

80 

1 

X 

I -TR- CARD-NO 

Record  Purge  Indicator 

TOTAL 

80 
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TABLE  6.U-9 


RECORD  SPECIFICATION 


RECORD  NAME:  Division  Stock  Record 

FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-DIV-STOCK 

TRANSACTION  CODE:  DA , DX 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

I-TR-DTE 

Transaction  Date 

9 

2 

XX 

I-TR-STR-ID 

Issue  Division 

11 

11 

X(ll) 

I-TR-DS-PART-NBR 

Item  Number 

22 

5 

9(5) 

I-TR-MAX-LEVEL 

Division  Stock  Level 

2T 

5h 

X(5U) 

FILLER 

TOTAL 

80 
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TABLE  6.i+-10 


RECORD  SPECIFICATION 


RECORD  NAME:  Average  Unit  Price  Change  Record 


FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-PRICE-CHG 

TRANSACTION  CODE:  EA 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

I-TR-DTE 

Price  Change  Date 

9 

11 

X(ll) 

I-TR-PART-NBR 

Item  Number 

20 

15 

X(15) 

FILLER 

35 

2 

XX 

I-TR-UNIT-MSRE 

Unit  of  Issue 

37 

8 

9(MV9(M 

I-TR-AVG-PRICE 

Average  Unit  Price 

^5 

36 

X(36) 

FILLER 

TOTAL 

8o 
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TABLE  6.1+-11 


RECORD  SPECIFICATION 


RECORD  NAME:  Vendor  Name  Record 

FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-VNDR 

TRANSACTION  CODE:  CA,  CX 

RECORD  LENGTH;  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

2 

XX 

FILLER 

5 

6 

X(6) 

I-TR-VNDR-DATE 

Transaction  Date 

11 

2 

XX 

FILLER 

13 

5 

9(5) 

I-TR-VNDR- CODE 

Vendor  Code 

18 

3 

X(3) 

FILLER 

21 

40 

x(4o) 

I-TR-VNDR-NAME 

Vendor  Name 

6l 

20 

X(20) 

FILLER 

TOTAL 

80 
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TABLE  6.k-12 


RECORD  SPECIFICATION 


RECORD  NAME:  System  Constants  Record 

FILE  NAME:  Standard  Transaction  File 

COBOL  NAME  OF  RECORD:  I-TR-CNST 

TRANSACTION  CODE:  FA 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

I-TR-DTE 

Transaction  Date 

9 

15 

X(15) 

FILLER 

2h 

2 

99 

I-TR-REO-NOT-INTRVL 

Reorder  Notification 
Interval 

26 

3 

999 

I-TR-LOW-USE-INTRVL 

Low  Usage  Interval 

29 

5 

9V9(i+) 

I-TR-SALES-TAX 

Sales  Tax  Factor 

3h 

9ih) 

I-TR-NBR-VEH 

Number  of  Vehicles  in 
Property 

38 

3 

999 

I -TR-UNFILLED-ORDER 

Unfilled  Purchase  Order 
Interval 

i+1 

k 

X{k) 

I-TR-MARKUP-FACTOR 

Markup  Factor  (A) 

2 

99 

I-TR-DC-PURGE-MO 

Direct  Charge  Item  Purge 
Factor 

2 

99 

I-TR-PO-PURGE-MO 

Purchase  Order  Purge 
Factor 

h9 

TOTAL 

32 

80 

X(32) 

FILLER 

(a)  Not  used 
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6. 5 Temporary  Storage  Transaction  File  (M.SRTEMP) 

The  Temporary  Storage  Transaction  File  is  a disk  file.  It  con- 
tains inventory  transactions  that  have  been  reformatted  from  the  80- 
character  standard  inventory  transactions  (see  Section  6. A).  The  new 
format  consists  of  a 19-character  sort  key  and  the  80-character 
transaction.  The  sort  key  consists  of  the  item  number,  transaction 
date,  and  an  internal  sort  code.  This  is  the  format  required  for 
processing  by  the  system. 

File  and  record  specifications  are  given  in  Tables  6.5-1  through 
6.5-11. 
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TABLE  6.5-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME : Temporary  Storage  Transaction  File 

FD  NAt4E:  WSTRAN2 

DATA  SET  NAI-IE:  M . SRTEMP 

NUMBER  OF  RECORD  FORMATS:  27  RECORD  SIZE:  99  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  hy:  Item  Numher 

Transaction  Date 
Sort  Code 

RECORD  FORMATS: 


TRANSACTION 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

OA,  ON, 

OX 

Purchase  Order  Record 

U 

0 

6a,  6n 

Materials  Receipt  Record 

U 

0 

7A,  7N 

Vendor  Return  Record 

U 

0 

8a,  in. 

8n, 

lA  Materials  Issue  Record 

U 

0 

2A,  2N, 

3A, 

3N  Adjustment  Record 

U 

0 

Ua,  Un, 

9A, 

9N 

AA,  AX 

Item  Characteristics  Record 

U 

0 

BA,  BX 

Item  Description  Record 

U 

0 

DA,DX 

Division  Stock  Record 

U 

0 

EA 

Average  Unit  Price  Change  Record 

U 

0 

RS 

Reorder  Status  Record 

U 

0 

PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

IDENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

DA300 

Data  Acceptance 

W 

0-TRANS-FILE 

DG300 

Inventory  Master  File  Edit/Update 

R 

INPUT-TRANSACTION-FILE 
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TABLE  6.5-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Purchase  Order  Record 

FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-PO 

TRANSACTION  CODE:  0A,  0N,  0X 

RECORD  LENGTH:  99  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=12,  13,  33) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

1 

X 

WS-TR-INDICATOR 

Purchase  Order  Type  Indica- 
tor (a) 

23 

6 

X(6) 

WS-TR-PO-NBR 

Purchase  Order  Number 

29 

5 

X(5) 

WS-TR-VNDR-ID 

Vendor  Code 

3^ 

3 

X(3) 

FILLER 

37 

6 

x(6) 

WS-TR-PO-DTE 

Purchase  Order  Date 

h3 

1 

X 

FILLER 

hk 

6 

x(6) 

WS-TR-DLVY-DTE 

Estimated  Delivery  Date 

50 

7 

x(7) 

FILLER 

57 

11 

X(ll) 

WS-TR-PO-PART-NBR 

Item  Number 

68 

2 

XX 

WS-TR-PO-UNIT-MSRE 

Unit  of  Issue 

70 

7 

9(5)V99 

WS-TR-PO-QTY 

Purchase  Order  Quantity 

77 

8 

9(U)V9(U)  ws-tr-po-price 

Purchase  Order  Price 

85 

k 

X(U) 

WS-TR-PO-ACCT 

Accoimt  Number 

89 

2 

XX 

WS-TR-PO-SUB-ACCT 

Sub-account  Nimiber 

91 

k 

x(U) 

WS-TR-PO-WO-NBR 

Work  Order  Number 

95 

k 

X(l+) 

WS-TR-PO-EQUIP-NBR 

Vehicle  Number 

99 

1 

X 

WS-TR-PO-FLEET 

Fleet  Charge 

TOTAL  99 


(a)  The  P.O.  Type  Indicator  is  supplied  by  DG300,  the  Inventory 
Master  File  Edit/Update,  for  use  by  program  RP060,  the 
Receiving  Report  Generator. 
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TABLE  6.5-3 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Receipt  Record 


FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-RCPT 


TRANSACTION  CODE: 

6a,  6n 

RECORD  LENGTH : 99 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

12 

6 

x(6) 

WS-KEY-DATE 

18 

2 

XX 

WS-KEY-CDE 

20 

2 

XX 

WS-TR-CDE 

22 

1 

X 

FILLER 

23 

6 

x(6) 

WS-TR-RC-PO-NBR 

29 

8 

X(8) 

FILLER 

37 

6 

X(6) 

WS-TR-RC-DTE 

i+3 

lU 

X(1U) 

FILLER 

57 

11 

x(ll) 

WS-TR-RC-PART-NBR 

68 

2 

XX 

WS-TR-RC-UNIT-MSRE 

70 

7 

9(5)V99 

WS-TR-RC-QTY 

77 

23 

x(23) 

FILLER 

TOTAL 

99 

FIELD  DESCRIPTION 
Item  Number 

Transaction  Date  (YYMMDD) 
Sort  Code  (=21,22) 
Transaction  Code 

Purchase  Order  Number 

Date  of  Receipt 

Item  Number 
Unit  of  Issue 
Quantity  Received 
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TABLE  6.5-4 


RECORD  SPECIFICATION 


RECORD  NAME:  Vendor  Return  Record 


FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-VNDR-RETURN 

TRANSACTION  CODE:  TA,  7N 


RECORD 

LENGTH: 

99  Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=23,24) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

1 

X 

FILLER 

23 

6 

X(6) 

WS-TR-SHIP-NTC-NBR 

Shipping  Notice  Number 

29 

5 

X(5) 

WS-TR-VR-VNDR-ID 

Vendor  Code 

34 

3 

X(3) 

FILLER 

37 

6 

x(6) 

WS-TR-RETURN-DTE 

Return  Date 

43 

1 

X 

FILLER 

44 

6 

X(6) 

WS-TR-VR-PO-NBR 

Piirchase  Order  Number 

50 

7 

X(7) 

FILLER 

57 

11 

x(ll) 

WS-TR-VR-PART-NBR 

Item  Number 

68 

2 

XX 

WS-TR-VR-UlilT-MSRE 

Unit  of  Issue 

70 

7 

9(5)V99 

WS-TR-RC-QTY 

Quantity  Returned 

77 

23 

X(23) 

FILLER 

TOTAL 

99 
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TABLE  6.5-5 


RECORD  SPECIFICATION 


RECORD  NAME;  Materials  Issue  and  Credit  Record 
FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-MAT-ISS-CR 


TRANSACTION  CODE: 

8a,  in,  8n,  1A 

RECORD  LENGTH : 99 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

x(6) 

NS-KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=26,31,10,14) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

1 

X 

WS-TR-DC-PO-IND 

Direct  Charge  Indicator 

23 

6 

X(6) 

WS-TR-DC-PO-NBR 

(A) 

Direct  Charge  Purchase 

29 

1 

X 

FILLER 

Order  Number  (A) 

30 

11 

x(ll) 

WS-TR-IC-PART-NBR 

Item  Number 

Ul 

7 

9(5)V99 

WS-TR-IC-QTY 

Issue  Quantity 

U8 

2 

XX 

WS-TR-IC-UNIT-MSRE 

Unit  of  Measure 

50 

19 

x(l9) 

FILLER 

69 

6 

x(6) 

WS-TR-IC-DTE 

Issue  Date 

75 

2 

XX 

WS-TR-VEH-CDE 

Vehicle  Group  Code 

77 

2 

XX 

WS-TR-UNIT-CDE 

Unit  Code 

79 

1 

X 

WS-TR-WORK-CODE 

Work  Code 

80 

1 

X 

WS-TR-REAS-CODE 

Reason  Code 

81 

2 

XX 

FILLER 

83 

4 

x(4) 

WS-TR-WO-NBR 

Work  Order  Number 

87 

6 

x(6) 

WS-TR-IC-ACCT 

Account  and  Sub-account 

93 

1 

X 

WS-TR-EQUIP-DIV 

Number 

Equipment  Division 

9h 

4 

x(4) 

WS-TR-EQUIP-NBR 

Vehicle  Number 

98 

1 

X 

WS-TR-FLEET 

Fleet  Charge  (6) 

99 

1 

X 

WS-TR-IC-DIV 

Issue  Division 

TOTAL 
(a)  For 

99 

free-stores  and  direct  charge  items,  the 

indicator  is  set  to 

'P'  and  the  Purchase  Order  number  is  entered.  These  values  are 
supplied  by  the  Data  Acceptance  program,  DA300. 
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TABLE  6.5-6 


RECORD  SPECIFICATION 


RECORD  NAME:  Adjustment  Record 

FILE  NAME:  Temporary  Storage  Transaction  File 


COBOL  NAME  OF  RECORD:  WS-TR-ADJ 


TRANSACTION  CODE 

: 2A,  2N,  3A 

, 3N,  UA,  Un,  9A,  9N 

RECORD  LENGTH: 

99  Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=15,16,17,18, 

19,20,27,28) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

6 

X(6) 

WS-TR- VOUCHER 

Adjustment  Voucher  Number 

28 

6 

X(6) 

WS-TR-ADJ-DATE 

Adjustment  Date 

2h 

6 

x(6) 

FILLER 

ho 

11 

x(ll) 

WS-TR-ADJ -PART-NBR 

Item  Number 

51 

2 

XX 

WS-TR-ADJ-UNIT-MSRE 

Unit  of  Issue  (a) 

53 

7 

9(5)V99 

WS-TR-ADJ- QTY 

Adjustment  Quantity  (B) 

60 

4o 

x(4o) 

FILLER 

TOTAL 

99 

(a)  The 

Unit  of 

Issue  is  not 

required  for  the  9A 

or  9N. 

(B)  For  the  9k  and  9N,  the  Adjustment  Quantity  field  contains  a value 
adjustment . 
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TABLE  6.5-7 


RECORD  SPECIFICATION 


RECORD  NAME:  Item  Characteristics  Record 

FILE  NAME;  Temporary  Storage  Transaction  File 
COBOL  NAME  OF  RECORD:  WS-TR-REC 

TRANSACTION  CODE:  AA,  AX 

RECORD  LENGTH:  99  Characters 


FIELD  FIELD 

POS.  LENG. 


1 11 

12  6 

18  2 

20  2 

22  6 

28  11 

39  15 

5k  2 

56  1+ 

60  3 

63  2 

65  5 

TO  h 

26 


TOTAL  99 


(a)  Not  Used 


FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

X(6) 

WS -KEY -DATE 

Transaction  Date  (YYMMDD) 

XX 

WS-KEY-CDE 

Sort  Code  (=01,02) 

XX 

WS-TR-CDE 

Transaction  Code 

x(6) 

WS-TR-DTE 

Transaction  Date 

x(6) 

WS-TR-PART-NBR 

Item  Number 

X(15) 

WS-TR-NAME 

Item  Name 

XX 

WS-TR-UNIT-MSRE 

Unit  of  Issue 

X(4) 

;b-tr-reorder-pt 

Reorder  Point 

x(3) 

WS-TR- LOW-USE- LIMIT 

Low  Usage  Interval  (A) 

XX 

WS-TR-NTCE-INTRVL 

Reorder  Notice  Interval 
(A) 

9V9(i+) 

W5-TR-SALES-TAX 

Sales  Tax  Factor 

X(U) 

WS-TR-MARKUP 

Markup  Factor  (A) 

x(26) 

FILLER 
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TABLE  6.5-8 


RECORD  SPECIFICATION 


RECORD  NAME;  Iten  Description  Record 


FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-DSCRPT 


TRANSACTION  CODE:  BA , BX 


RECORD 

LENGTH:  99 

Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=03,0U) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

6 

x(6) 

WS-TR-DTE 

Transaction  Date 

28 

11 

X(ll) 

WS-TR-PART-NBR 

Item  Number 

39 

30 

X(30) 

WS-TR-DSCRPTl 

First  30  Characters  of 

Item  Description 

69 

30 

X(30) 

WS-TR-DSCRPT2 

Remainder  of  Description 

99 

1 

X 

WS-TR-CARD-NO 

Record  Purge  Indicator 

TOTAL 

99 

TABLE  6.5-9 


RECORD  SPECIFICATION 


RECORD  NAME:  Division  Stock  Record 

FILE  NAME;  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WB-TR-DIV-STOCK 

TRANSACTION  CODE:  DA,  DX 

RECORD  LENGTH:  99  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

xUX) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

x(6) 

WS -KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=0T,08) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

6 

x(6) 

WS-TR-DTE 

Transaction  Date 

28 

2 

XX 

WS-TR-STR-ID 

Division  Number 

30 

11 

x(ll) 

WS-TR-DS-PART-NBR 

Item  Number 

1+1 

5 

9(5) 

WS-TR-MAX-LEVEL 

Division  Stock  Level 

1+6 

51+ 

X(5l+) 

FILLER 

TOTAL 

99 
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TABLE  6.5-10 


RECORD  SPECIFICATION 


RECORD  NAME;  Average  Unit  Price  Change  Record 


FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD;  WS-TR-PRICE-CHG 
TRANSACTION  CODE:  EA 

RECORD  TrFNGTH:  99  Characters 


FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

I 11  X(ll)  WS-KEY-PART-NBR 


12 

6 

X(6) 

WS -KEY -DATE 

18 

2 

XX 

WS-KEY-CDE 

20 

2 

XX 

WS-TR-CDE 

22 

6 

X(6) 

WS-TR-DTE 

28 

11 

x(ll) 

WS-TR-PART-NBR 

39 

15 

X(15) 

FILLER 

2 

XX 

WS-TR-UNIT-MSRE 

56 

8 

9(4)V9(1+)  ws-tr-avg-price 

2 

XX 

WS-TR-NEG-PR-IND 

66 

x{3h) 

FILLER 

TOTAL 

99 

FIELD  DESCRIPTION 
Item  Number 

Transaction  Date  (YYMMDD) 
Sort  Code  (=09) 
Transaction  Code 
Transaction  Date 
Item  Number 

Unit  of  Issue 
Average  Unit  Price 
Negative  Price  Indicator 
(A) 


(a)  The  negative  price  indicator  is  supplied  by  program  DA250,  the 
Price  Correction  Processor. 
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TABLE  6.5-11 


RECORD  SPECIFICATION 

RECORD  NAME:  Reorder  Status  Record 

FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD;  WS-TR-REORDER 

TRANSACTION  CODE:  RS 

RECORD  LENGTH:  99  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

12 

6 

X(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

18 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=29) 

20 

2 

XX 

WS-TR-CDE 

Transaction  Code 

22 

11 

X(ll) 

WS-TR-RS-PART-NBR 

Item  Number 

33 

6 

x(6) 

WS-TR-RS-DATE 

Reorder  Status  Date 

39 

2 

99 

WS-TR-RNTCE 

Reorder  Notice  Number 

hi 

^9. 

X(59) 

FILLER 

TOTAL 

99 

6.6  Current  Transaction  File  (M.TRANDISK(  )) 


The  Current  Transaction  File  is  a disk  file.  It  contains  the 
transactions  processed  by  the  system  during  the  most  recent  Inventory 
run.  The  transactions  are  127  characters  long  and  consist  of  a sort 
key,  the  80-character  user-supplied  input  transaction,  and  a 22-character 
suffix.  The  suffix  is  attached  by  the  Inventory  Master  File  Edit/Up- 
date program,  DG300,  and  consists  of  the  on-hand  quantity,  the  on-order 
quantity,  and  the  average  unit  price  for  the  item  number  against  which 
the  transaction  was  processed. 

This  file  is  a generation  data  set.  Three  versions  are  saved  on 
disk  at  all  times.  These  three  versions  represent  the  transactions  pro- 
cessed during  the  last  three  system  runs. 

File  and  record  specifications  are  given  in  Tables  6.6-1  through 

6.6-11. 
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TABLE  6.6-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Current  Transaction  File 

FD  NAME:  None 

DATA  SET  NAME;  M.TRANDISK(  ) 


NUMBER  OF  RECORD  FORMATS:  2?  RECORD  SIZE:  127  Characters 

FILE  ORGANIZATION;  Sequenced  hy:  Item  Number 

Transaction  Date 
Sort  Code 

RECORD  FORMATS 
TRANSACTION 


CODE 

RECORD  NAME  MAX.  NC 

1.  MIN.  NO. 

iSA,  m. 

j5X 

Purchase  Order  Record 

U 

0 

6a,  6n 

Materials  Receipt  Record 

U 

0 

TA,  TN 

Vendor  Return  Record 

U 

0 

8a,  in. 

8N, 

LA  Materials  Issue  Record 

U 

0 

2A,  2N, 

3A, 

3N  Adjustment  Record 

U 

0 

4a,  4n, 

9A, 

9N 

AA,  AX 

Item  Characteristics 

U 

0 

BA,  BX 

Item  Description  Record 

U 

0 

DA,  DX 

Division  Stock  Record 

U 

0 

EA 

Average  Unit  Price  Change  Record 

U 

0 

RS 

Reorder  Status  Record 

U 

0 

PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

IDENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

DG300 

Inventory  Master  File  Edit/Update 

w 

OUTPUT-TEMP-TRANSACTION 

RPOIOC 

Materials  Transaction  History  Report 

R 

INPUT-TRANS ACTI ON-HI S TORY 

Generator 

RPOOO 

Transaction  History  File  Update 

R 

INPUT-DISK 

RP016 

Division  Stock  Replacement  Report 

R 

HIST-FILE 

Generator 
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TABLE  6.6-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Pixrchase  Order  Record 
FILE  NAME:  Current  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-PO 

TRANSACTION  CODE:  0A,  0N,  0X 
RECORD  LENGTH:  127  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

X(6) 

I-PRO CESS -DATE 

Date  Processed 

7 

11 

x(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS -KEY -DATE 

Transaction  Date  (YYMMDD) 

2h 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=12,13,33) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

1 

X 

WS-TR-INDICATOR 

Purchase  Order  Type 

Indicator  (A) 

29 

6 

x(6) 

WS-TR-PO-NBR 

Purchase  Order  Number 

35 

5 

x(5) 

WS-TR-VNDR-IO 

Vendor  Code 

i+0 

3 

x(3) 

FILLER 

i+3 

6 

X(6) 

WS-TR-PO-DTE 

Purchase  Order  Date 

1+9 

1 

X 

FILLER 

50 

6 

x(6) 

WS-TR-DLVY-DTE 

Estimated  Delivery  Date 

56 

7 

x(7) 

FILLER 

63 

11 

x(ll) 

WS-TR-PO-PART-NBR 

Item  Number 

7U 

2 

XX 

WS-TR-PO-UNIT-MSRE 

Unit  of  Issue 

76 

7 

9(5)V99 

WS-TE-PO-QTY 

Purchase  Order  Quantity 

83 

8 

9(1+)V9(U)  ws-tr-po-price 

Purchase  Order  Price 

91 

li 

X(l+) 

WS-TR-PO-ACCT 

Account  Number 

95 

2 

XX 

WS-TR-PO-SUB-ACCT 

Sub-account  Number 

97 

1+ 

x(U) 

WS-TR-PO-WO-NBR 

Work  Order  Number 

101 

1+ 

X(l+) 

WS-TR-PO-EQUIP-NBR 

Vehicle  Number 

105 

1 

X 

WS-TR-PO-FLEET 

Fleet  Charge 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On-Hand  Quantity 

120 

8 

S9(i+)V(1+) 

I-AVG-PRICE 

Average  Unit  Price 

TOTAL 

127 

(a)  The  P.O.  Type  Indicator  is  supplied  hy  DG300,  the  Inventory  Master 
File  Edit /Update,  for  use  hy  program  RPO6O,  the  Receiving  Report 
Generator . 
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TABLE  6.6-3 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Receipt  Record 

FILE  NAME;  Current  Transaction  File 
COBOL  NAME  OF  RECORD:  WS-TR-RCPT 

TRANSACTION  CODE:  6A,  6N 

RECORD  LENGTH;  127  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORJiAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

X(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

x(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2h 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=21,22) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

1 

X 

FILLER 

29 

6 

x(6) 

WS-TR-RC-PO-NBR 

Purchase  Order  Number 

35 

8 

x(8) 

FILLER 

1*3 

6 

x(6) 

WS-TR-RC-DTE 

Date  of  Receipt 

1+9 

lU 

X(ll+) 

FILLER 

63 

11 

x(ll) 

WS-TR-RC-PART-NBR 

Item  Number 

7U 

2 

XX 

WS-TR-RC-UNIT-MSRE 

Unit  Of  Issue 

76 

7 

9(5)V99 

WS-TR-RC-QTY 

Quantity  Received 

83 

23 

X(23) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On- Hand  Quantity 

120 

8 

S9  ( U ) V9  ( 1+ ) I -AVG-PRICE 

Average  Unit  Price 

TOTAL 

127 

6-51 


TABLE  6.6-U 


RECORD  SPECIFICATION 

RECORD  NAME:  Vendor  Retiarn  Record 

FILE  NAME:  Current  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-VNDR-RETURN 

TRANSACTION  CODE;  7A,  JN 
RECORD  LENGTH:  127  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

X(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2h 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=23»2l+) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

1 

X 

FILLER 

29 

6 

x(6) 

WS-TR-SHIP-NTC-NBR 

Shipping  Notice  Number 

35 

5 

x(5) 

WS-TR-VR-VNDR-ID 

Vendor  Code 

i+0 

3 

X(3) 

FILLER 

h3 

6 

X(6) 

WS-TR-RETURN-DTE 

Return  Date 

1+9 

1 

X 

FILLER 

50 

6 

X(6) 

WS-TR-VR-PO-NBR 

Purchase  Order  Number 

56 

7 

X(7) 

FILLER 

63 

11 

x(ll) 

WS -TR- VR-PART-NBR 

Item  N+jmber 

7i+ 

2 

XX 

WS-TR-VR-UNIT-MSRE 

Unit  of  Issue 

76 

7 

9(5)V99 

WS-TR-VR-QTY 

Quantity  Returned 

83 

23 

X(23) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On- Hand  Quantity 

120 

8 

S9  ( U ) V9  ( 1+ ) I - AVG-PRI CE 

Average  Unit  Price 

TOTAL 

127 

\ 
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TABLE  6.6-5 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Issue  and  Credit  Record 

FILE  NAME:  Current  Transaction  File 

COBOL  NAME  OF  RECORD;  WS-TR-MAT-ISS-CR 
TRANSACTION  CODE:  8A,  IN,  8N,  1A 

RECORD  LENGTH:  12?  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

X(6) 

I-PROCESS-DATE 

Date  Processed 

7 

n 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2k 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=26,31,10,11*) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

1 

X 

WS-TR-DC-PO-IND 

Direct  Charge  Indicator 

29 

6 

x(6) 

WS-TR-DC-PO-NBR 

(A) 

Direct  Charge  Purchase 

35 

1 

X 

FILLER 

Order  (A) 

36 

11 

x(ll) 

WS-TR-IC-PART-NBR 

Item  Nmber 

kj 

7 

9(5)V99 

WS-TR-IC-QTY 

Issue  Quantity 

5k 

2 

XX 

WS-TR-IC-UNIT-MSRE 

Unit  of  Issue 

56 

19 

X(19) 

FILLER 

75 

6 

x(6) 

WS-TR-IC-DTE 

Issue  Date 

8l 

2 

XX 

WS-TR-VEH-CDE 

Vehicle  Group  Code 

83 

2 

XX 

WS-TR-UNIT-CDE 

Unit  Code 

85 

1 

X 

WS-TR-WORK-CODE 

Work  Code 

86 

1 

X 

WS-TR-REAS-CODE 

Reason  Code 

87 

2 

XX 

FILLER 

89 

U 

x(k) 

WS-TR-WO-NBR 

Work  Order  Number 

93 

6 

X(6) 

WS-TR-IC-ACCT 

Account  and  Sub-account 

99 

1 

X 

WS-TR-EQUIP-DIV 

Equipment  Division 

100 

k 

X(U) 

WS-TR-EQUIP-NBR 

Vehicle  Nimiber 

lOU 

1 

X 

WS-TR-FLEET 

Fleet  Charge 

1P5 

1 

X 

WS-TR-IC-DIV 

Issue  Division 

106 

7 

S9(5)V99 

I-ON-HAND-QTY 

On-Hand  Quantity 

113 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

120 

8 

S9(k)V9(k )I-AVG-PRICE 

Average  Unit  Price 

TOTAL 
(A)  For 

127 

free-stores  and  direct  charge  items,  the 

indicator  is  set 

to  ' 

'P'  and 

the  Purchase 

Order  nvraher  is  entered.  These  values 

are 

supplied  hy  the  Data  Acceptance  prograjn. 

DA300. 
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TABLE  6.6-6 


RECORD  SPECIFICATION 


RECORD  NAME:  Quantity  and  Value  Adjustment  Record 

FILE  NAME:  Current  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-ADJ 

TRANSACTION  CODE:  2A,  2N,  3A,  3N,  4a,  1+N,  QA,  9N 

RECORD  LENGTH;  127  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

X(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

X(ll) 

NS-KEY-PART-NBR 

Item  Number 

18 

6 

X(6) 

WS -KEY-DATE 

Transaction  Date  (YYMMDD) 

2h 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=15,16,17,18, 

19,20,27,28) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

6 

X(6) 

WS-TR-VOUCHER 

Adjustment  Voucher  Nimiber 

6 

X(6) 

WS-TR-ADJ-DATE 

Adjustment  Date 

i+0 

6 

X(6) 

FILLER 

h6 

11 

x(ll) 

WS-TR-ADJ-PART-NBR 

Item  Number 

57 

2 

XX 

WS-TR-ADJ-UNIT-MSRE 

Unit  of  Issue  (A) 

59 

7 

9(5)V99 

WS-TR-ADJ-QTY 

Adjustment  Quantity  (B) 

66 

ho 

X(i+0) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On- Hand  Quantity 

120 

8 

S9  ( 4 ) V9  ( ) I - AVG-PRI CE 

Average  Unit  Price 

TOTAL 

127 

(A)  The 

Unit  of 

Issue  is  not 

required  for  the  9A  or 

9N. 

(B)  For 

the  9A 

and  9N,  the  Adjustment  Quantity  field 

contains  a 

value  adjustment. 
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TABLE  6.6-7 


RECORD  SPECIFICATION 


RECORD  NAME:  Item  Characteristics  Record 

FILE  NAME;  Current  Transaction  File 
COBOL  NAME  OF  RECORD:  WS-TR-REC 

TRANSACTION  CODE:  AA,  AX 

RECORD  LENGTH:  12?  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

x(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2k 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=01,02) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

6 

x(6) 

WS-TR-DTE 

Transaction  Date 

3k 

11 

X(ll) 

WS-TR-PART-NBR 

Item  Number 

k5 

15 

X(15) 

WS-TR-NAME 

Item  Name 

60 

2 

XX 

WS-TR-UNIT-MSRE 

Unit  of  Issue 

62 

1+ 

x(i+) 

WS-TR-REORDER-PT 

Reorder  Point 

66 

3 

x(U) 

WS-TR-LOW-USE-LIMIT 

Low  Usage  Interval  (A) 

69 

2 

XX 

WS -TR-NTCE- INTRVL 

Reorder  Notice  Interval 

(A) 

71 

5 

9V9(U) 

WS-TR- SALES -TAX 

Sales  Tax  Factor 

76 

U 

x(i+) 

WS-TR-MARKUP 

Markup  Factor  (A) 

80 

26 

x(26) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On- Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On-Hand  Quantity 

120 

8 

S9(L )V9(U )I-AVG- PRICE 

Average  Unit  Price 

TOTAL 

127 

(A)  Not  Used 
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TABLE  6.6-8 


RECORD  SPECIFICATION 


RECORD  NAME:  Item  Description  Record 

FILE  NAME:  Current  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-DSCRPT 

TRANSACTION  CODE:  BA , BX 

RECORD  LENGTH:  127  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

x(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

x(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2k 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=03,0i+) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

6 

X(6) 

WS-TR-DTE 

Transaction  Date 

3k 

11 

x(ll) 

WS-TR-PART-NBR 

Item  Number 

k5 

30 

X(30) 

WS-TR-DSCRPTl 

First  30  Character  of 

Item  Description 

75 

30 

X(30) 

WS-TR-DSCRPT2 

Remainder  of  Description 

105 

1 

X 

WS-TR- CARD-NO 

Record  Purge  Indicator 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On-Hand  Quantity 

120 

8 

S9 ( U ) V9 ( u )I-AVG-PRICE 

Average  Unit  Price 

TOTAL 

127 
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TABLE  6.6-9 


RECORD  SPECIFICATION 


RECORD  NAME:  Division  Stock  Record 

FILE  NAME:  Temporary  Storage  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-DIV-STOCK 

TRANSACTION  CODE:  DA,  DX 

RECORD  LENGTH:  12?  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

x(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2h 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=07,08) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

6 

X(6) 

WS-TR-DTE 

Transaction  Date 

3h 

2 

XX 

WS-TR-STR-ID 

Division  Number 

36 

11 

x(ll) 

WS-TR-DS-PART-NBR 

Item  Number 

I+T 

5 

9(5) 

WS-TR-MAX-LEVEL 

Division  Stock  Level 

52 

5^+ 

X(5i+) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

i-on-hand-qty 

On- Hand  Quantity 

120 

8 

S9  ( 1+ ) V9  ( )I-AVG- PRICE 

Average  Unit  Price 

TOTAL 

127 
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TABLE  6.6-10 


RECORD  SPECIFICATION 


RECORD  NAME:  Average  Unit  Price  Change  Record 

FILE  NAME;  Current  Transaction  File 
COBOL  NAME  OF  RECORD:  WS-TR-PRICE-CHG 

TRANSACTION  CODE;  EA 
RECORD  LENGTH:  127  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

I 

6 

x(6) 

I-PROCESS-DATE 

Date  Processed 

7 

11 

x(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

x(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2h 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=09) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

6 

X(6) 

WS-TR-DTE 

Transaction  Date 

31+ 

11 

x(ll) 

WS-TR-PART-NBR 

Item  Number 

15 

X(15) 

FILLER 

60 

2 

XX 

WS-TR-UNIT-MSRE 

Unit  of  Issue 

62 

8 

9(l+)V9(i+)  WS-TR-AVG-PRICE 

Average  Unit  Price 

70 

2 

XX 

WS-TR-NEG-PR-IND 

Negative  Price  Indicator 

(A) 

72 

3h 

X(3U) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On-Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On- Hand  Quantity 

120 

8 

S9  ( L ) V9 ( 4 )I-AVG-PRICE 

Average  Unit  Price 

TOTAL 

127 

(a)  The  negative  price  indicator  is  supplied  by  program  DA250,  the 


Price  Correction  Processor. 
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TABLE  6.6-11 


RECORD  SPECIFICATION 


RECORD  NAME;  Reorder  Status  Record 
FILE  NAME:  Current  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-REORDER 

TRANSACTION  CODE:  RS 

RECORD  LENGTH:  12?  Characters 


FIELD  FIELD 


POS. 

LENG- 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

x(6) 

I-PROCESS-DATE 

Date  Processed 

T 

11 

X(ll) 

WS-KEY-PART-NBR 

Item  Number 

18 

6 

X(6) 

WS-KEY-DATE 

Transaction  Date  (YYMMDD) 

2k 

2 

XX 

WS-KEY-CDE 

Sort  Code  (=29) 

26 

2 

XX 

WS-TR-CDE 

Transaction  Code 

28 

11 

x(ll) 

WS  -TR-RS-PART-NBR 

Item  Number 

39 

6 

x(6) 

WS-TR-RS-DATE 

Reorder  Status  Date 

k5 

2 

99 

WS-TR-RNTCE 

Reorder  Notice  Number 

1+7 

59 

x(59) 

FILLER 

106 

7 

S9(5)V99 

I-ON-ORDER-QTY 

On- Order  Quantity 

113 

7 

S9(5)V99 

I-ON-HAND-QTY 

On-Hand  Quantity 

120 

8 

S9  ( U ) V9  ( 1+  )I-AVG- PRICE 

Average  Unit  Price 

TOTAL 

127 

6-59 


6. 7 Transaction  History  File  (M.TRANTAPE(  )) 


The  Transaction  History  File  is  a tape  file.  It  contains  a record 
of  all  transactions  ever  processed  by  the  Inventory  system  up  to  and 
including  the  most  recent  system  execution. 

The  Transaction  History  File  is  a generation  data  set.  Three 
versions  are  saved  at  all  times.  These  versions  represent  the  status 
of  the  file  as  of  the  last  three  system  executions. 

File  and  record  specifications  are  given  in  Table  6.7-1. 


6-60 


TABLE  6.7-1 

SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Transaction  History  File 

FD  NAME:  None 

DATA  SET  NAME:  M.TRANTAPE(  ) 

NUMBER  OF  RECORD  FORMATS:  26  RECORD  SIZE:  127  Characters 

FILE  ORGANIZATION:  Sequenced  by:  Processing  Date 

Item  Number 

Transaction  Date 
Sort  Code 


RECORD 

FORMATS 

FORMAT 

CODE 

RECORD  NAME 

MAX. 

NO.  MIN.  NO. 

2>A,  0N, 

0X 

Purchase  Order  Record 

U 

0 

6a,  6n 

Materials  Receipt  Record 

U 

0 

7A,  7N 

Vendor  Return  Record 

U 

0 

8a,  8N, 

lA,  IN 

Materials  Issue  Record 

U 

0 

2A,  2N, 
i+A,  1+N, 

3A,  3N 
9A,9N 

Adjustment  Record 

U 

0 

AA,  AX 

Item  Characteristices  Record 

U 

0 

BA,  BX 

Item  Description  Record 

U 

0 

DA,  DX 

Division  Stock  Record 

U 

0 

EA 

Average  Unit  Price  Change 

Record 

U 

0 

PROGRAM 

USE 

PROGRAM 

IDENT. 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

RPOOO 

RPOOO 

RPOIOD 

DA250 

Transaction  History  File  Update 
Transaction  History  File  Update 
Requested  Materials  Transaction 
Report  Generator 
Price  Correction  Processor 

History 

R 

W 

R 

R 

INPUT-TAPE 
OUTPUT -TAPE 

INPUT-TRANSACTION-HISTORY 

I-TRAN-HIST 

The  Record  Names,  Transaction  Codes,  and  Specifications  are  the  same 
as  for  the  Current  Transaction  File,  M.TRANDISK(  ) (see  Section  6.6). 
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Note : 


6. 8 Temporary  Suspense  File  (M.INVSUSPN) 


The  Temporary  Suspense  File  is  a disk  file.  It  contains  80-character 
user  input  transactions  which,  while  valid  transactions,  could  not  be 
processed  by  the  Inventory  Master  File  Edit/Update  program,  DG300.  The 
processing  of  these  transactions  would  result  in  a violation  of  file 

update  criteria — e.g.,  the  on-hand  balance  of  an  item  may  never  be  a nega- 
tive quantity.  By  spooling  these  transactions  to  this  disk  file,  they 
may  be  reprocessed  on  subsequent  runs  until  they  are  accepted. 

File  and  record  specifications  are  given  in  Tables  6.8-1  through 
6.8-5. 
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TABLE  6.8-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Temporary  Suspense  File 

FD  NAME:  SPSNFD2 

DATA  SET  NAME:  M. INVSUSPN 

NUMBER  OF  RECORD  FORMATS : 7 RECORD  SIZE:  80  Chara.cters 

FILE  ORGAI'JIZATION : Sequenced  by:  Item  Number 

Transaction  Date 

RECORD  FORMATS 
FORMAT 


CODE 

RECORD  NAME 

liAX.  NO. 

MEN.  NO. 

8a,  in 

Materials  Issue  Record 

U 

0 

2N,  3A, 

Ua  Quantity  Adjustment  Record 

U 

0 

7A 

Vendor  Return  Record 

U 

0 

6n 

Materials  Receipt  Record 

U 

0 

PROGRAIi 

USE 

PROGRAM 

PROGRAM  COBOL 

IDENT 

PROGRAIi  NAME 

I/O 

NAME 

FOR  FILE 

DG300 

Inventory  Master  File  Edit/Update 

W 

OUTPUT-SUSPENSE-FILE 

RPOll 

Reorder  Notification  Report  Generator 

R 

INPUT 

-SUSP-FILE 
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TABLE  6.8-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Issue  Record 

FILE  NAME:  Temporary  Suspense  File 

COBOL  NAME  OF  RECORD:  I-TR-MAT-ISS-CR 

TRANSACTION  CODE:  8A,  IN 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

2 

99 

0-SUSP-8A-FLAG 

Suspense  Cycle  Counter 

5 

6 

x(6) 

FILLER 

11 

11 

x(ll) 

I-TR-IC-PART-NBR 

Item  N\jmher 

22 

7 

9(5)V99 

I-TR-IC-QTY 

Quantity  Issued 

29 

2 

XX 

I-TR-IC-UNIT-MSRE 

Unit  of  Issue 

31 

19 

X(19) 

FILLER 

50 

6 

X(6) 

I-TR-IC-DTE 

Issue  Date 

56 

2 

XX 

I-TR-IC-GRP 

Vehicle  Group  Code 

58 

2 

XX 

I-TR-IC-UNIT 

Unit  Code 

60 

2 

XX 

I-TR-IC-WR 

Work/Reason  Code 

62 

2 

XX 

FILLER 

64 

4 

x(4) 

I-TR-IC-WO 

Work  Order  Number 

68 

4 

X(4) 

I-TR-IC-ACCT 

Account  Nimiber 

72 

2 

XX 

I-TR-IC-SUB 

Sub-account  Number 

74 

1 

X 

I-TR-IC-EQUIP 

Equipment  Division 

75 

4 

X(4) 

I-TR-IC-VEH 

Vehicle  Number 

79 

1 

X 

I-TR-IC-FLT 

Fleet  Charge 

8o 

1 

X 

I-TR-IC-DIV 

Issue  Division 

TOTAL 

80 
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5ABLE  6.8-3 
RECORD  SPECIFICATION 


RECORD  NAME:  Quantity  Adjustment  Record 

FILE  NAME:  Temporary  Suspense  File 

COBOL  NAIIE  OF  RECORD:  I-TR-ADJ 

TRAI^SACTION  CODE:  2N,  3A,  i+A 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORI4AT 

COBOL  FIELD  NAME 

1 

2 

XX 

I-TR-CDE 

3 

6 

X(6) 

I-TR-VOUCHER 

9 

6 

9(6) 

I-TR-ADJ-DATE 

15 

6 

X(6) 

FILLER 

21 

11 

X(ll) 

I-TR-ADJ-PART-NBR 

32 

2 

XX 

I-TR-UNIT-I>1SRE 

3U 

7 

9(5)V99 

I-TR-ADJ-QTY 

1+1 

38 

X(38) 

FILLER 

79 

2 

99 

0-SUSP-CIFT-FLAG 

TOTAL 

8o 

FIELD  DESCRIPTION 


Transaction  Code 
Adjustment  Voucher  Nimiber 
Adjustment  Date 

Item  Number 
Unit  of  Issue 
Adjustment  Quantity 

Suspense  Cycle  Counter 
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TABLE  6.8-i+ 


RECORD  SPECIFICATION 

RECORD  NAME:  Vendor  Return  Record 

FILE  NAME:  Temporary  Suspense  File 

COBOL  NAME  OF  RECORD;  I-TR-VNDR-RETURN 
TRANSACTION  CODE:  TA 

RECORD  LENGTH:  80  Charac1;ers 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

1; 

6 

X(6) 

I-TR-SHIP-NTC-NBR 

Shipping  Report  Number 

10 

5 

x(5) 

I-TR-VR-VNDR-ID 

Vendor  Code 

15 

3 

X(3) 

FILLER 

18 

6 

X(6) 

I-TR-RETURN-DTE 

Vendor  Return  Date 

2h 

1 

X 

FILLER 

25 

6 

X(6) 

I-TR-VR-PO-NBR 

Purchase  Order  Number 

31 

3 

X(3) 

FILLER 

34 

4 

X(4) 

I-TR-VR-ACCT-NBR 

Account  Number  (A) 

38 

11 

X(ll) 

I-TR-VR-PART-NBR 

Item  Number 

49 

2 

XX 

I-TR-VR-UNIT-MSRE 

Unit  of  Issue 

51 

7 

9(5)V99 

I-TR-VR-QTY 

Quantity  Returned 

58 

21 

X(21) 

FILLER 

79 

2 

99 

0-SUSP-CNT-FLAG 

Suspense  Cycle  Covinter 

TOTAL  80 


(A)  Not  Used 
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TABLE  6.8-5 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Receipt  Record 

FILE  NAME:  Temporary  Suspense  File 

COBOL  NAME  OF  RECORD:  I-TR-RCPT 


TRANSACTION  CODE : 6N 


RECORD 

LENGTH: 

80  Characters 

[1  FIELD 

,!  POS . 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

, 1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

6 

9(6) 

I-TR-RC-PO-NBR 

Purchase  Order  Number 

:!  10 

8 

X(8) 

FILLER 

1 

6 

X(6) 

I-TR-RC-DTE 

Receipt  Date 

1 

14 

X(14) 

FILLER 

1 38 

11 

X(ll) 

I-TR-RC-PART-NBR 

Item  Number 

i 49 

2 

XX 

I-TR-RC-UNIT-MSRE 

Unit  of  Issue 

51 

7 

9(5)V99 

I-TR-RC-QTY 

Quantity  Received 

58 

21 

X(21) 

FILLER 

79 

2 

99 

0-SUSP-CNT-FLAG 

Suspense  Cycle  Counter 

TOTAL  80 
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6.9  Suspense  File  (SUSPFILE(  )) 


The  Suspense  File  is  a disk  file.  It  contains  80-character  trans- 
actions that  are  valid  according  to  edit  criteria  but  could  not  be 
processed  by  the  Inventory  Master  File  Edit/Update  program  DG300  due 
to  violation  of  system  update  criteria.  The  Suspense  File  is  created 
by  the  Reorder  Notification  Report  Generator,  RPOll,  which  copies 
the  contents  of  the  Temporary  Suspense  File,  M.INVSUSPN,  to  the  file 
and  adds  any  Reorder  Status  (RS)  transactions  created  by  the  program. 

The  Suspense  File  is  a generation  data  set.  Three  versions  are 
saved  on  disk  at  all  times.  These  versions  represent  the  results  of 
the  three  most  recent  system  executions. 

File  and  record  specifications  are  given  in  Tables  6.9-1  and  6.9-2. 
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TABLE  6.9-1 

SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Suspense  File 

FD  NAME:  SPSNFD2 

DATA  SET  NAME:  SUSPFILE(  ) 

TOER  of  record  FORMATS:  8 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 


RECORD  FORMATS 

FORMAT 

CODE 

RECORD  NAME 

8a,  in 

Materials  Issue  Record 

2N,  3A,  1+A 

Quantity  Adjustment  Record 

7A 

Vendor  Return  Record 

6n 

Materials  Receipt  Record 

RS 

Reorder  Status  Record 

PROGRAM  USE 


MAX.  NO. 
U 
U 
U 
U 
U 


MIN.  NO. 
0 
0 
0 
0 
0 


PROGRAM 
IDENT . 

DA300 

RPOll 


PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


Data  Acceptance  ^ r I-SUSPENSE-FILE 

Reorder  Notification  Report  Generator  W SUSPENSE-REORDER-FILE 


Note:  With  the  exception  of  the  Reorder  Status  (RS)  record,  the 

Record  Names,  Format  Codes,  and  Specifications  are  the  same 
as  for  the  Temporary  Suspense  File,  M.INVSUSPN  (see  Section  6.8). 
The  RS  record  is  specified  in  Table  6.9-2. 


) 
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TABLE  6.9-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Reorder  Status  Record 

FILE  NAME:  Suspense  File 

COBOL  NAME  OF  RECORD:  O-SUSPENSE-RECORD 

TRANSACTION  CODE;  RS 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

O-SPNS-CODE 

Transaction  Code 

3 

11 

X(ll) 

0-SPNS-PART-NBR 

Item  Number 

Ik 

6 

9(6) 

O-SPNS-REORDER-NTCE-DATE 

Date  of  Reorder  Notice 

20 

2 

99 

O-SPNS-REORDER-NTCE-NBR 

Reorder  Notice  Number 

22 

X(59) 

FILLER 

TOTAL 

80 
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6.10  Purchase  Order  Transaction  File  (M.POTRANS) 

The  Purchase  Order  Transaction  File  is  a disk  file.  It 
a record  of  all  Purchase  Order  transactions  processed  during  the 
current  system  run.  It  is  read  by  the  Receiving  Report  Generator 
program,  RP060. 

File  and  record  specifications  are  given  in  Tables  6.10-1  and 

6.10-2. 
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TABLE  6.10-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Purchase  Order  Transaction  File 

FD  NAME:  None 

DATA  SET  NAME:  M.POTRANS 

NUMBER  OF  RECORD  FORMATS:  2 RECORD  SIZE:  127  Characters 

FILE  ORGANIZATION:  Sequenced  by:  Item  Number 

Transaction  Date 

RECORD  FORMATS 
FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 

(5A,  0N  Purchase  Order  Record  U 0 


PROGRAM  USE 


PROGRAM 

I DENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


DG300  Inventory  Master  File  Edit/Update 

RP060  Receiving  Report  Generator 


W OUTPUT-PO-TRANSACTION 
R PO-FILE 
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TABLE  6.10-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Purchase  Order  Record 

Em:  NAME:  Purchase  Order  Transaction  File 

COBOL  NAME  OF  RECORD:  WS-TR-PO 

TRANSACTION  CODE:  0A,  0N 

RECORD  LENGTH:  127  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

6 

X(6) 

I-PROCESS-DATE 

7 

11 

X(ll) 

WS-KEY-PART-NBR 

I8 

6 

X(6) 

WS-KEY-DATE 

24 

2 

XX 

WS-KEY-CDE 

26 

28 

2 

XX 

WS-TR-CDE 

1 

X 

WS-TR-INDICATOR 

29 

6 

X(6) 

WS-TR-PO-NBR 

35 

ho 

5 

X(5) 

WS-TR-VNDR-ID 

3 

X(3) 

FILLER 

h3 

k9 

6 

X(6) 

WS-TR-PO-DTE 

1 

X 

FILLER 

50 

6 

X(6) 

WS-TR-DLAFif-DTE 

56 

7 

x(7) 

FILLER 

63 

7i+ 

76 

11 

X(ll) 

WS-TR-PO-PART-NBR 

2 

XX 

WS-TR-PO-UNIT-MSRE 

7 

9(5)V99 

WS-TR-PO-QTY 

83 

8 

9(^)V9(U) 

WS-TR-PO-PRICE 

91 

k 

Xih) 

WS-TR-PO- ACCT 

95 

2 

XX 

WS-TR-PO-SUB-ACCT 

97 

h 

x(i+) 

WS-TR-PO-WO-NBR 

101 

105 

h 

x(U) 

WS-TR-PO-EQUIP-NBR 

1 

X 

WS-TR-PO-FLEET 

106 

15 

x(l5) 

0-PO-TRANS-NAME 

121 

126 

5 

9Y9{k) 

0-PO-TRANS-TAX 

2 

XX 

FILLER 

TOTAL 

127 

FIELD  DESCRIPTION 

Date  Processed 
Item  Number 

Transaction  Date  (YYMMDD) 

Sort  Code  (=12,13) 

Transaction  Code 
Purchase  Order  Type  Indicator 
(A) 

Purchase  Order  Number 
Vendor  Code 

Purchase  Order  Date 

Estimated  Delivery  Date 

Item  Number 
Unit  of  Issue 
Purchase  Order  Quantity 
Purchase  Order  Price 
Account  Number 
Sub-account  Nximber 
Work  Order  Number 
Vehicle  Number 
Fleet  Charge 
Item  Name  (A) 

Sales  Tax  Factor  (A) 


(A) 


^ Name,  and  Sales  Tax  Factoi 

’ Inventory  Master  File  Edit/Update,  for  use 
RPObO,  the  Receiving  Report  Generator. 


are  supplied 
by  program 
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6. 11  Inventory  Constants  File  (S. CONST) 


The  Inventory  Constants  File  is  a disk  file.  It  contains  a single 
record  of  those  constants  necessary  to  the  execution  of  Inventory  re- 
port generators.  The  file  is  maintained  by  the  Data  Acceptance  pro- 
gram, DA300. 

File  and  record  specifications  are  given  in  Tables  6.11-1  and 

6.11-2. 
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TABLE  6.11-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Inventory  Constants  File 

FD  NAME:  INVENT 2 


DATA  SET  NAME:  S. CONST 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  60  Characters 

FILE  ORGANIZATION:  Not  Applicable 

RECORD  FORMATS: 


FORMAT 

CODE  RECORD  NAME 


MAX.  NO.  MIN.  NO. 


FA 


Inventory  Constants  Record 


1 


1 


PROGRAM  USE 


PROGRAM 

IPENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


DA300 

DG300 

RPOll 

RP013 

RP018 

RP020 

RP022 


Data  Acceptance  p/' 

Inventory  Master  File  Edit/Update  R 

Reorder  Notification  Report  Generator  R 

Unfilled  Purchase  Orders  Report  Generator  R 
Low  Usage  Materials  Report  Generator  R 

Inventory  Activity  Report  Generator  R 

Outstanding  Purchase  Orders  Report  r 

Generator 


CONTROL-FILE 

INPUT- CONSTANTS-FI LE 

CONTROL-FILE 

CONTROL-FILE 

CONTROL-FILE 

CONST- FILE 

CONTROL-FILE 


TABLE  6.11-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Inventory  Constants  Record 

FILE  NAME:  Inventory  Constants  File 

COBOL  NAME  OF  RECORD:  I-CONSTANTS-RECORD 

RECORD  FORMAT  CODE:  FA 

RECORD  LENGTH:  60  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-CONST-CDE 

Record  Format  Code 

3 

6 

X(6) 

I-CONST-DATE 

Date  of  Last  Update 

9 

15 

X(15) 

FILLER 

24 

2 

99 

I-REO-NOT-INTRVL 

Reorder  Notice  Interval 

26 

3 

9(3) 

I-LOW-USE-INTRVL 

Low  Usage  Interval 

29 

5 

9V9(4) 

I-SALES-TAX 

Sales  Tax  Factor 

34 

4 

9(4) 

I-NBR-VEH 

Number  of  Vehicles  in 
Property 

38 

3 

9(3) 

I -UNFILLED- ORDER 

Unfilled  Purchase  Order 
Interval 

4i 

4 

9V9(3) 

I-MARKUP-FACTOR 

Markup  Factor  (A) 

45 

2 

99 

I-DC-PURGE-MON 

Direct  Charge  Item 
P\irge  Factor 

47 

2 

99 

I-PO-PURGE-MON 

Purchase  Order  Piarge 
Factor 

49 

TOTAL 

12 

6o 

X(12) 

FILLER 

(a)  Not  Used 
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6.12  Inventory  Control  File  (S.CTL) 


The  Inventory  Control  File  is  a partitioned  data  set  residing  on 
disk.  The  partition  members  contain  card  images  of  control  cards  neces 
sary  to  execute  the  IBM  utility  programs  employed  by  the  system.  The 
utilities  used  are  lEBGENER  (Data  Set  Copy)  and  lEHDASDR  (Disk  Save) . 

File  and  record  specifications  are  given  in  Table  6.12-1. 


TABLE  6.12-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Inventory  Control  File 

DATA  SET  NAME:  S.CTL 

NUMBER  OF  MEMBERS:  2 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION  : S.CTL  is  a partitioned  data  set  which 

contains  card  images  of  control  cards 
necessary  to  execute  IBM  utilities  lEBGENER 
and  lEHDASDR.  The  file  is  accessed  hy 
specifying  the  member  name  containing 
the  desired  control  cards. 


MEMBER  NAMES 
INVDTE01 


CTLBKUP 


CONTENTS 

Two  card  images,  as  follows: 
GENERATE  MAXFLDS=1 
RECORD  FIELD=(60,1, ,1) 

One  card  image,  as  follows: 
DUMP  FROMDD=DISK,TODD=TAPE 


PROGRAM  USE 


PROGRAM 
I DENT 

lEBGENER 

lEHDASDR 


MEMBER 

USED 

INVDTE01 

CTLBKUP 


PROGRAM 
I/O  PURPOSE 

R Copy  date  cards  to  Report 

Date  File,  S.DATE 

R Dump  Inventory  disk,  ACTINV, 

to  magnetic  tape 


Note:  All  card  images  have  their  contents  beginning  in  column 

three  (3)  of  the  80-character  image. 
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6. 13  Vendor  Reference  File  (M. VENDOR) 


The  Vendor  Reference  File  is  an  indexed  sequential  file  residing 
on  disk.  It  contains  a hollerith  identification  for  each  vendor  number 
used  by  the  particular  property.  The  access  key  to  this  file  is  by 
vendor  number.  The  vendor  names  are  used  by  the  report  generator  pro- 
grams to  identify  the  vendor  number. 

File  and  record  specifications  are  given  in  Tables  6.13-1  and  6.13-2. 


TABLE  6.13-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Vendor  Reference  File 


FD  NAME: 

VENDED 

DATA  SET 

NAME:  M. VENDOR 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE: 

52  Characters 

FILE  ORGANIZATION:  The  file  is  in  increasing  order 

vendor  number  with  the  exception  of 

vendors  added  or  changed  after 

start 

- 

up.  The  access  method  is  random. 

RECORD  FORMATS: 

FORMAT 

CODE 

RECORD  NAME 

MAX. 

NO.  MIN.  NO. 

Vendor  Record 

U 1 

PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

I DENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

DA300 

Data  Acceptance 

R/W 

IS-VENDOR-REFERENCE-FILE 

rpo6o 

Receiving  Report  Generator 

R 

INPUT-VENDOR-REFERENCE 

RP014 

Vendor  Performance  Report  Generator 

R 

IS-VNDR-REF 

RP022 

Outstanding  Purchase  Orders  Report 

R 

IS-VNDR-REF 

Generator 

RP02i+ 

Vendor  File  List  Program 

R 

VEND-FILE 

VEND 01 

Vendor  Reference  File  Startup  Program 

W 

IS-VENDOR-FILE 
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TABLE  6.13-2 


RECORD  SPECIFICATION 

RECORD  NAME:  Vendor  Record 

FILE  NAME:  Vendor  Reference  File 

COBOL  NAME  OF  RECORD;  I-VENDOR-RECORD 
RECORD  FORMAT  CODE:  None 

RECORD  LENGTH;  52  Characters 


FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

1 

1 

X 

2 

5 

9(5) 

7 

6 

X(6) 

13 

i+0 

X(i+o) 

TOTAL 

52 

(a)  Supplied  by  ISAM  file 


COBOL  FIELD  NAME 

DELETE-CODE 

I-VENDOR-NO 

I-VENDOR-DATE 

I-VENDOR-NAME 


maintenance  software. 


FIELD  DESCRIPTION 

Record  Deletion  Code  (A) 
Vendor  Number 
Date  Record  Last  Up- 
dated 

Vendor  Identification 
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6.14  Report  Date  File  (S.DATE) 


The  Report  Date  File  is  a disk  file  created  through  execution  of 
IBM  utility  program  lEBGENER.  It  contains  card-image  records  of  the 
report  request  cards  supplied  by  the  user.  Each  of  the  report  generator 
programs  reads  this  file  to  determine  the  date  for  the  report,  and  the 
report  option  specified,  if  any. 

File  and  record  specifications  are  given  in  Tables  6.14-1  and  6.14-2. 
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TABLE  6.IU-I 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME 

: Report  Date  File 

FD  NAME: 

DATEIN 

DATA  SET  NAME:  S.DATE 

NUMBER  OF 

RECORD  FORMATS:  1 RECORD  SIZE: 

60  Characters 

FILE  ORGANIZATION  : Random  Order 

RECORD  FORMATS: 

FORMAT 

CODE 

RECORD  NAME 

MAX.  NO.  MIN.  NO. 

Report  Date  Record 

U 

0 

PROGRAM  USE 

PROGRAM 

PROGRAM  COBOL 

IDENT . 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

RPOll 

Reorder  Notification  Report  Generator 

R 

DATE-FILE 

RPOI3 

Unfilled  Purchase  Orders  Report  Generator  R 

DATE-FILE 

RPOlU 

Vendor  Performance  Report  Generator 

R 

DATE-FILE 

RPOI7 

Stock  Status  Report  Generator 

R 

DATE-FILE 

RPOI8 

Low  Usage  Materials  Report  Generator 

R 

DATE-FILE 

RP020 

Inventory  Activity  Report  Generator 

R 

DATE-FILE 

RP022 

Outstanding  Purchase  Order  Report 

R 

DATE-FILE 

Generator 

INr/ADJ 

Inventory  Value  Adjustment  Program 

R 

INCARD 

INVCADJ 

Inventory  Class  Master  Adjustment  Program  R 

INCARD 

INVCOUNT 

Inventory  Master  Card  Generator  Program 

R 

DATE-FILE 

INVQTY 

Inventory  Quantity  Adjustment  Program 

R 

DATE-FILE 

INVDIV 

Division  Stock  Reconciliation  Program 

R 

DATE-FILE 

lEBGENER 

Data  Set  Copy  Utility 

W 
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TABLE  6.IU-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Report  Date  Record 

FILE  NAME:  Report  Date  File 

COBOL  NAME  OF  RECORD:  DATE-RECORD 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH;  60  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-REPORT-NO 

Report  Request  Code 

(see  Table  4.3-1) 

3 

6 

X(6) 

I-REPORT-DATE 

Report  Request  Date 

(YYMMDD) 

9 

2 

XX 

D-OPR-CODE 

Report  Option  Code 

11 

1 

X 

FILLER 

12 

2 

XX 

I-LOW-CLASS 

Low  Class  Code 

14 

1 

X 

FILLER 

15 

2 

XX 

I-HIGH-CLASS 

High  Class  Code 

IT 

1 

X 

FILLER 

18 

3 

9(3) 

I- LOW-USE- CODE 

Low  Usage  Interval 

21 

ho 

x(4o) 

FILLER 

TOTAL 

60 
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6.15  Report  Date  Card  File  (DATECD) 


The  Report  Date  Card  File  is  a set  of  records  read  through  the  job 
stream  on  punched  cards.  These  records  are  user-supplied  request  cards 
for  various  report  generator  programs.  This  file  is  used  as  input  to 
utility  program  lEBGENER,  which  creates  the  Report  Date  File  (see  Section 
6.14) . 


File  and  record  specifications  are  given  in  Tables  6.15-1  and  6.15-2. 
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TABLE  6.15-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


Report  Date  Card  File 


FILE  NAME: 

FD  NAME:  DATEIN 

DATA  SET  NAME:  DATECD 

NUMBER  OF  RECORD  FORMATS:  1 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME 

Report  Date  Card  Record 

PROGRAM  USE 
PROGRAM 

I DENT.  PROGRAM  NAME 

lEBGENER  Data  Set  Copy 


RECORD  SIZE:  80  Characters 


MAX.  NO.  MIN.  NO. 

U 0 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 

R 
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TABLE  6.15-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Report  Date  Card  Record 

FILE  NAME:  Report  Date  Card  File 

COBOL  NAME  OF  RECORD:  DATE-RECORD 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-REPORT-NO 

Report  Request  Code 

(see  Table  U.3-1) 

3 

6 

x(6) 

I-REPORT-DATE 

Report  Request  Date 

(YYMMDD) 

9 

2 

XX 

D-OPR-CODE 

Report  Option  Code 

11 

1 

X 

FILLER 

12 

2 

XX 

I-LOW-CLASS 

Low  Class  Code 

lU 

1 

X 

FILLER 

15 

2 

XX 

I-HIGH-CLASS 

High  Class  Code 

IT 

1 

X 

FILLER 

18 

3 

9(3) 

I-LOW-USE-CODE 

Low  Usage  Interval 

21 

60 

x(6o) 

FILLER 

TOTAL 

80 
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6.16  ACTD  Card  Input  File  (TRANCD) 


The  ACTD  Card  Input  File  is  a set  of  records  read  through  the  job 
stream  on  punched  cards.  It  contains  Inventory  transactions  that  are 
in  the  ACTD  format.  This  file  is  read  by  the  User  Input  Processor 
program  DA200A,  which  converts  the  transactions  to  standard  inventory 
formats  (see  Section  6.4). 

File  and  record  specifications  are  given  in  Tables  6.16-1  and  6.16-2. 
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TABLE  6.16-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  ACTD  Card  Input  File 

FD  NAME:  None 

DATA  SET  NAME:  TRANCD 

NUMBER  OF  RECORD  FORMATS:  29  RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS: 

TRANSACTION 


CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO, 

AA,  AX 

Item  Characteristics  Record 

U 

0 

BA,  BX 

Item  Description  Record 

U 

0 

2A,  2N, 

3A 

Quantity  Adjustment  Record 

U 

0 

3N,  kA, 

i+N 

9A,  9N 

Value  Adjustment  Record 

U 

0 

TA,  7N 

Vendor  Return  Record 

U 

0 

6a,  6n 

Materials  Issue  Record 

U 

0 

8a,  in 

Materials  Issue  Record 

U 

0 

OA,  ONi 

OX 

Purchase  Order  Record 

U 

0 

EA 

Average  Unit  Price  Change  Record 

U 

0 

FA 

System  Constants  Record 

U 

0 

DA,  DX 

Division  Stock  Record 

U 

0 

CA,  CX 

Vendor  Name  Record 

U 

0 
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TABLE  6.16-1  (CONCLUDED) 


SIMS  INVENTORY  FILE  SPECIFACTION 


PROGRAM  USE 

PROGRAM 

PROGRAM  COBOL 

IDENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

DA200A 

User  Input  Tape  Processor  (ACTD) 

R 

I-TRANS-FILE 

Note:  The  Record  Names,  Transaction  Formats,  and  Specifications 

are  the  same  as  for  the  Standard  Transaction  File,  &INVTRN 
(see  Section  6.U),  except  for  the  8A,  8N,  1A,  and  IN  trans- 
actions. The  format  for  these  transactions  is  given  in 
Table  6.16-2. 
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TABLE  6.16-2 


RECORD  SPECIFICATION 


RECORD  NAME : Materials  Issue  and  Materials  Credit  Reco;rd 

FILE  NAME:  ACTD  Card  Input  File 

COBOL  NAME  OF  RECORD:  I-TR-MAT-ISS-CR 

TRANSACTION  CODE:  8A,  IN,  8N,  1A 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

8 

x(8) 

FILLER 

11 

9 

x(9) 

I-TR-IC-PART-NBR 

Item  Nmber 

20 

2 

XX 

I-TR-IC-UNIT-MSRE 

Unit  of  Issue 

22 

7 

9(5)V99 

I-TR-IC-QTY 

Issue  Quantity 

29 

22 

X(22) 

FILLER 

5x 

5 

x(5) 

I-TR-IC-DTE 

Issue  Date  (YMMDD) 

56 

2 

XX 

I-TR-IC-GRP 

Vehicle  Group  Code 

58 

2 

XX 

I-TR-IC-UNIT 

Unit  Code 

60 

2 

XX 

I-TR-IC-WR 

Work/Reason  Code 

62 

2 

XX 

FILLER 

64 

4 

X(4) 

I-TR-IC-WO 

Work  Order  Number 

68 

4 

X(4) 

I-TR-IC-ACCT 

Account  Number 

72 

2 

XX 

I-TR-IC-SUB 

Sub-account  Number 

74 

1 

X 

I-TR-IC-EQUIP 

Equipment  Division 

75 

4 

X(4) 

I-TR-IC-VEH 

Vehicle  Number 

79 

1 

X 

I-TR-IC-FLT 

Fleet  Charge 

80 

1 

X 

I-TR-IC-DIV 

Issue  Division 

TOTAL  80 
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6.17  DTS  Tape  Input  File  (DTSTRAN) 


The  DTS  Tape  Input  File  is  a magnetic  tape  file.  It  contains 
80-character  records  of  Inventory  transactions  in  the  DTS  format.  This 
file  is  read  by  the  User  Input  Processor  program,  DA200D,  which  con- 
verts the  transactions  to  the  standard  inventory  formats  (see  Section  6.4). 

File  and  record  specifications  are  given  in  Tables  6.17-1  through 
6.17-6. 
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TABLE  6.17-1 


SIMS  INVENTORY  FILE  SPECIFICATION 

FILE  NAME:  DTS  Tape  Input  File 

FD  NAME:  DTSTRAN2 

DATA  SET  NAME:  DTSTRAN 

NUMBER  OF  RECORD  FORMATS:  29  RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 


RECORD  FORMATS: 
TRANSACTION 


CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO 

AA, 

AX 

Item  Characteristics  Record 

U 

0 

BA, 

BX 

Item  Description  Record 

U 

0 

2A, 

3N, 

2N,  3A 
i+A,  i+N 

Qiiantity  Adjustment  Record 

U 

0 

9A, 

9N 

Value  Adjustment  Record 

U 

0 

TA, 

TN 

Vendor  Ret\rrn  Record 

U 

0 

6a, 

6n 

Materials  Receipt  Record 

U 

0 

8a, 

IN 

Materials  Issue  Record 

U 

0 

8n, 

lA 

Materials  Credit  Record 

U 

0 

OA, 

ON,  OX 

Purchase  Order  Record 

U 

0 

EA 

Average  Unit  Price  Change  Record 

U 

0 

FA 

System  Constants  Record 

U 

0 

DA, 

DX 

Division  Stock  Record 

U 

0 

CA, 

CX 

Vendor  Name  Record 

U 

0 
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TABLE  6.17-1  (CONCLUDED) 


SIMS  INVENTORY  FILE  SPECIFICATION 


PROGRAM  USE 


PROGRAM 

IDENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


DA200D 


User  Input  Tape  Processor  (DTS) 


R I-TRANS-FILE 


Note:  The  Record  Name,  Transaction  Formats,  and  Specifications  are 

the  same  as  for  the  Standard  Transaction  File,  SiINVTRN  (see 
Section  6.U),  with  the  following  exceptions:  2A,  2N,  3A, 

3N,  Ua,  1+N,  TA,  TN,  6A,  6N,  8A,  8N,  1A,  in,  OA,  ON,  and  OX. 
The  formats  of  these  transactions  are  given  in  Tables  6.17-2 
through  6.17-6. 
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TABLE  6.17-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Quantity  Adjustment  Record 

FILE  NAME:  DTS  Tape  Input  File 

COBOL  NAME  OF  RECORD:  I-TR-ADJ 

TRANSACTION  CODE:  2A,  2N,  3A,  3N,  4A,  UN 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

I-TR- VOUCHER 

Voucher  Number 

9 

6 

x(6) 

I-TR-ADJ-DATE 

Adjustment  Date 

15 

6 

X(6) 

FILLER 

21 

11 

x(ll) 

I -TR-AD J-PART-NBR 

Item  Number 

32 

1 

X 

FILLER 

33 

h 

9(M 

I-TR-ADJ-QTY 

Adjustment  Quantity 

37 

2 

XX 

I-TR-ADJ-UNIT-MSRE 

Unit  of  Issue 

39 

U2 

X(i+2) 

FILLER 

TOTAL 

80 
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TABLE  6.17-3 


RECORD  SPECIFICATION 


■ RECORD  NAME:  Vendor  Return  Record 


FILE  NAME:  DTS  Tape  Input  File 

COBOL  NAIvffi  OF  RECORD:  I-TR-VNDR-RETURN 

TRANSACTION  CODE:  7A,  7N 


RECORD 

LENGTH : 

80  Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

2 

XX 

I-TR-CDE 

3 

1 

X 

FILLER 

1+ 

6 

x(6) 

I-TR-SHIP-NTC-NBR 

10 

5 

9(5) 

I-TR-VR-VNDR-ID 

15 

3 

X(3) 

FILLER 

18 

6 

x(6) 

I-TR-RETURN-DTE 

2k 

1 

X 

FILLER 

25 

6 

x(6) 

I-TR-VR-PO-NBR 

31 

3 

x(3) 

FILLER 

3i+ 

U 

X(U) 

I-TR-VR-ACCT-NBR 

38 

11 

x(ll) 

I-TR-VR-PART-NBR 

kg 

2 

XX 

FILLER 

51 

5 

9(5) 

I-TR-VR-QTY 

56 

2 

XX 

I-TR-VR-UNIT-MSRE 

58 

23 

X(23) 

FILLER 

TOTAL 

80 

FIELD  DESCRIPTION 

Transaction  Code 

Shipping  Notice  Number 
Vendor  Number 

Return  Date 

Purchase  Order  Number 

Account  Number 
Item  Number 

Quantity  Retiirned 
Unit  of  Issue 


TABLE  6.1T-i+ 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Receipt  Record 

FILE  NAME:  DTS  Tape  Input  File 

COBOL  NAME  OF  RECORD:  I-TR-RCPT 

TRANSACTION  CODE:  6A,  6N 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

k 

6 

9(6) 

I-TR-RC-PO-NBR 

Purchase  Order  Number 

10 

8 

x(8) 

FILLER 

18 

6 

x(6) 

I-TR-RC-DTE 

Date  Received 

2h 

Ih 

X(ll+) 

FILLER 

38 

11 

x(ll) 

I-TR-RC-PART-NBR 

Item  Number 

1+9 

2 

XX 

FILLER 

51 

5 

9(5) 

I-TR-RC-QTY 

Quantity  Received 

56 

2 

XX 

I-TR-RC-UNIT-MSRE 

Unit  of  Issue 

58 

23 

X(23) 

FILLER 

TOTAL 

80 
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TABLE  6.17-5 


RECORD  SPECIFICATION 


RECORD  NAME:  Materials  Issue  and  Credit  Record 

FILE  NAME:  DTS  Tape  Input  File 

COBOL  NAME  OF  RECORD:  I-TR-MAT-ISS-CR 


TRANSACTION  CODE: 

8a,  ln,  8n,  1A 

RECORD  LENGTH:  80 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

6 

x(6) 

FILLER 

9 

2 

XX 

I-TR-ISS-STR-ID 

Issue  Store 

11 

10 

X(10) 

FILLER 

21 

1+ 

x(i+) 

I-TR-ISS-ACCT-NBR 

Account  Number 

25 

2 

XX 

FILLER 

27 

h 

X(U) 

I-TR-ISS-WO-NBR 

Work  Order  Number 

31 

h 

X(l+) 

I-TR-ISS-VEH-NBR 

Vehicle  Number 

35 

2 

XX 

I-TR-ISS-GRP-CDE 

Group  Code 

37 

2 

XX 

I-TR-ISS-UNIT-CDE 

Unit  Code 

39 

1 

X 

I-TR-ISS-WORK-TYPE 

Work  Type  Code 

40 

1 

X 

I-TR-ISS-REAS-CDE 

Reason  Code 

i+1 

3 

9(3) 

I-TR-ISS-QTY 

Issue  Quantity 

2 

XX 

I-TR-ISS-UNIT-MSRE 

Unit  of  Issue 

he 

11 

x(ll) 

I-TR-ISS-PART-NBR 

Item  Number 

57 

2U 

X(2l+) 

FILLER 

TOTAL 

8o 
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TABLE  6.17-6 


RECORD  SPECIFICATION 


RECORD  NAME:  Purchase  Order  Record 

FIT.F.  NAME:  DTS  Tape  Input  File 

COBOL  NAME  OF  RECORD:  I-TR-PO 

TRANSACTION  CODE:  OA,  ON,  OX 

RECORD  LENGTH:  80  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-TR-CDE 

Transaction  Code 

3 

1 

X 

FILLER 

L 

6 

9(6) 

I-TR-PO-NBR 

Piir chase  Order  Number 

10 

5 

9(5) 

I-TR-VNDR-ID 

Vendor  Code 

15 

3 

X(3) 

FILLER 

18 

6 

x(6) 

I-TR-PO-DTE 

Purchase  Order  Date 

2h 

1 

X 

FILLER 

25 

6 

X(6) 

I-TR-DLVY-DTE 

Estimated  Delivery  Date 

31 

7 

x(7) 

FILLER 

38 

11 

x(ll) 

I-TR-PO-PART-NBR 

Item  Number 

1+9 

2 

XX 

FILLER 

51 

5 

9(5) 

I-TR-PO-QTY 

Purchase  Order  Quantity 

56 

2 

XX 

I-TR-PO-UNIT-MSRE 

Unit  of  Issue 

58 

8 

9(i+)V9(J+) 

I-TR-PO-PRICE 

Purchase  Order  Price 

66 

1+ 

X(l+) 

I-TR-ACCT-NBR 

Account  Number 

TO 

2 

XX 

I-TR-SUB-ACCT 

Sub-account  Number 

72 

1+ 

x(i+) 

I-TR-WO-NBR 

Work  Order  Number 

76 

1+ 

X(4) 

I-TR-EQUIP-NBR 

Vehicle  Niunber 

80 

1 

X 

I-TR-FLT-CHG 

Fleet  Charge 

TOTAL 

80 
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6.18  Part  History  Select  Card  File  (SYSIN) 


The  Part  History  Select  Card  File  is  a set  of  records  read  through 
the  job  stream  on  punched  cards.  It  consists  of  control  cards  necessary 
to  the  execution  of  the  Requested  Materials  Transaction  History  Report 
Generator  program,  RPOIOD.  This  file  specifies  user-selected  item 
numbers  for  which  transaction  data  is  to  be  printed. 

File  and  record  specifications  are  given  in  Tables  6.18-1  and  6,18-?. 
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TABLE  6.18-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Part  History  Select  Card  File 

FD  NAME:  None 

DATA  SET  NAME:  SYSIN 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 


Part  Select  Card  Record 


20  1 


PROGRAM  USE 


PROGRAM 

IDENT.  PROGRAM  NAME 


I/O 


PROGRAM  COBOL 
NAME  FOR  FILE 


RPOIOD  Requested  Materials  Transaction  History  R INPUT-SELC-CARD 
Report  Generator 
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TABLE  6.18-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Part  Select  Card  Becord 


FILE  NAME;  Part  History  Select  Card  File 
COBOL  NAME  OF  RECORD;  I-SELC-CARD 


RECORD 

FORMAT  CODE 

: None 

RECORD 

LENGTH : 80 

Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

I-PART-NBR 

Item  Number 

12 

1 

X 

FILLER 

13 

6 

x(6) 

I-DATEl 

From  Date  (YYMMDD) 

19 

1 

X 

FILLER 

20 

6 

X(6) 

I-DATE2 

To  Date  ( YYMMDD) 

26 

55 

X(55) 

FILLER 

TOTAL  80 
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6.19  File  Records  Select  Card  File  (SYSIN) 


The  File  Records  Select  Card  File  is  a set  of  records  read  through 
the  job  stream  on  punched  cards.  It  consists  of  control  cards  necessary 
to  the  execution  of  the  Inventory  Master  File  List  program,  INVLST.  This 
file  specifies  a set  of  inventory  item  numbers  the  records  for  which 
are  to  be  printed  from  the  Inventory  Master  File. 

File  and  record  specifications  are  given  in  Tables  6.19-1  and  6.19-2. 
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TABLE  6.19-1 


SIMS  INVENTORY  FILE  SPECIFICATION 

FILE  NAME:  File  Records  Select  Card  File 

FD  NAME:  None 

DATA  SET  NAME:  SYSIN 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Item  Number 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 


File  Record  Select  Card  Record 

U 

1 

PROGRAM 

USE 

PROGRAM 
I DENT. 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

INVEST 

Inventory  Master  File  List 

R 

CARD-FILE 
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TABLE  6.19-2 


RECORD  SPECIFICATION 


RECORD  NAME:  File  Record  Select  Card  Record 
FILE  NAME:  File  Records  Select  Card  File 

COBOL  NAME  OF  RECORD:  WS-REQUEST 


RECORD 

F0RI4AT 

CODE 

: None 

RECORD 

LENGTH: 

80 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

WS-PART-MIN 

Low  Item  Nimher 

12 

1 

X 

FILLER 

13 

11 

x(ll) 

WS-PART-MAX 

High  Item  Number 

2h 

1 

X 

WS-OPT 

Report  Option  Code 

25 

56 

x(56) 

FILLER 

TOTAL 

80 
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6.20  Vendor  Select  Card  File  (SYSIN) 


The  Vendor  Select  Card  File  is  a single  record  input  through  the 
job  stream  on  a punched  card.  It  contains  a specification  of  a range 

of  vendor  numbers  that  are  to  be  printed.  The  file  is  read  by  the 
Vendor  File  List  program,  RP024,  and  the  record  is  used  to  control 
the  printing  of  vendor  numbers  and  associated  names. 

File  and  record  specifications  are  given  in  Tables  6.20-1  and  6.20-2. 
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TABLE  6.20-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Vendor  Select  Card  File 


FD  NAME:  None 

DATA  SET  NAME:  SYS IN 

NUMBER  OF  RECORD  F0RI4ATS:  1 

RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Not  Applicable 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

Vendor  Select  Card  Record 

1 

1 

PROGRAIi  USE 
PROGRAM 

IDENT.  PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

RP02U  Vendor  File  List 

R 

CARD-FILE 
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TABLE  6.20-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Vendor  Select  Card  Record 

FILE  NAME:  Vendor  Select  Card  File 

COBOL  NAME  OF  RECORD:  CARD-REC 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

5 

X(5) 

VEND-LOW 

Low  Vendor  Number  To 
Be  Printed 

6 

1 

X 

FILLER 

T 

5 

X(5) 

VEND-HIGH 

High  Vendor  Number  To 
Be  Printed 

12 

.^9 

X(69) 

FILLER 

TOTAL  80 


6.21  Price  Correction  Card  File  (PCTRAN) 


The  Price  Correction  Card  File  is  a set  of  records  read  through 
the  job  stream  on  punched  cards.  It  contains  a specification  of  pur- 
chase orders,  for  particular  item  numbers,  the  Purchase  Order  price  of 
which  requires  change.  This  file  is  read  by  the  Price  Corrrection  Pro- 
cessor program,  DA250. 

File  and  record  specifications  are  given  in  Tables  6.21-1  and  6.21-2. 
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TABLE  6.21-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Price  Correction  Card  File 

FD  NAME:  PCTRAN 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS; 


FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 

PC  Price  Correction  Card  Record  10  1 


PROGRAM  USE: 


PROGRAM 

IDENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


DA250 


Price  Correction  Processor 


R 


I-CARD-FILE 


TABLE  6.21-2 


RECORD  SPECIFICATION 

RECORD  NAME:  Price  Correction  Card  Record 

FILE  NAME:  PCTRAN 

COBOL  NAME  OF  RECORD:  I-CD-REC 

RECORD  FORI4AT  CODE:  PC 

PBCORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

I-CD-PC 

Record  Format  Code 

3 

11 

X(ll) 

I-CD-PT-NBR 

Item  Number 

Ih 

6 

9(6) 

i-cd-'po-nbr 

Ptirchase  Order  Number 

To  Be  Corrected 

20 

6 

9(i+)V9(i*) 

I-CD-PRICE 

Revised  Purchase 

Order  Price 

25 

53 

X(53) 

FILLER 

TOTAL 

80 
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6.22  Inventory  Master  Card  File  (SYSOUT=B) 


The  Inventory  Master  Card  File  is  a file  of  punched  cards  output 
to  the  system  punch.  It  contains  80-character  records  detailing  on- 
hand  quantities  for  each  division  store,  for  particular  item  numbers 
on  the  Inventory  Master  File.  These  cards  are  used  to  take  physic9l 
inventory  of  the  transit  property  stores.  The  file  is  created  by  the 
Inventory  Master  Card  Generator  program,  INVCOUNT. 

File  and  record  specifications  are  given  in  Tables  6.22-1  and  6.22-2. 
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TABLE  6.22-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Inventory  Master  Card  File 

FD  NAME:  None 

DATA  SET  NAME:  SYSOUT=B 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Sequenced  hy:  Item  Number 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 

Inventory  I-kster  Card  Record  U 1 


PROGRAM  USE 


PROGRAM 

IDENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


INVCOUNT  Inventory  Master  Card  Generator 


W 0-PUNCH 
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TABLE  6.22-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Inventory  Master  Card  Record 

FILE  NAME:  Inventory  Master  Card  File 

COBOL  NAME  OF  RECORD:  REPORT-REC 


RECORD 

FORMAT 

CODE: 

; None 

RECORD 

LENGTH ; 

; 80 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

1 

X 

FILLER 

2 

6 

9(6) 

R-REPORT-DATE 

Report  Date  (YYMMDD) 

8 

1 

X 

FILLER 

9 

11 

x(ll) 

R-INV-PART-NBR 

Item  Number 

20 

1 

X 

FILLER 

21 

15 

X(15) 

R-ITEM-NAME 

Item  Description 

36 

1 

X 

FILLER 

37 

2 

XX 

R-ISS-UNIT-MSRE 

Unit  of  Issue 

39 

1 

X 

FILLER 

40 

7 

9(5)V99 

SR-QTY-COUNT 

Quantity  Counted  (a) 

^7 

9 

X(9) 

FILLER 

56 

5 

X(5) 

R-QTY-ENTRY 

•QTY  =' 

6l 

13 

X(13) 

FILLER 

74 

2 

XX 

R-DIV 

Division  Code 

76 

1 

X 

FILLER 

77 

4 

9(4) 

R-SEQ-NO 

Card  Sequence  Number 

TOTAL 

8o 

(a)  This  field  is  not  punched.  The  Quantity  Counted  value  is 

to  be  entered  by  the  user  upon  completion  of  physical  inven- 
tory. The  cards  are  then  input  to  the  Inventory  Quantity  Ad- 
justment program,  INVQTY,  and  the  Division  Stock  Reconcilia- 
tion program,  INVDIV. 
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6.23  Quantity  Adjustment  Card  File  (ADJCD) 


The  Quantity  Adjustment  Card  File  is  a set  of  records  input  through 
the  job  stream  on  punched  cards.  It  contains  80-character  records  that 
specify  physical  inventory  count  data  for  the  items  on  the  Inventory 
Master  File.  These  cards  are  generated  by  the  Inventory  Master  Card 
Generator  program,  INVCOUNT,  modified  by  the  user  to  include  on-hand 
quantity  counts,  and  input  to  the  Inventory  Quantity  Adjustment  program 
INVQTY. 

File  and  record  specifications  are  given  in  Table  6.23-1. 
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TABLE  6.23-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Quantity  Adjustment  Card  File 


FD  NAME:  None 

DATA  SET  NAME:  ADJCD 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE;  80  Characters 


FILE  ORGANIZATION:  Sequenced  by:  Item  Number 

Sequence  Number 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 


Quantity  Adjustment  Card  Record  U 


1 


PROGRAM  USE 


PROGRAM 

IDENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


INVQTY  Inventory  Quantity  Adjustment  Program 
INVCOUNT  Inventory  Master  Card  Generator 


R I -CARD-FILE 

W 0-PUNCH 


Note:  The  record  format  and  specification  is  the  same  as  for 

the  Inventory  Master  Card  File  (SYS0UT=B)  (see  Section 

6.22). 
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6.24  Division  Stock  Reconciliation  Card  File  (DIVCD) 


The  Division  Stock  Reconciliation  Card  File  is  a set  of  records 
input  through  the  job  stream  on  punched  cards.  It  contains  80-character 
records  that  specify  physical  inventory  count  data  for  the  items  on 
the  Inventory  Master  File.  These  cards  are  generated  by  the  Inventory 
Master  Card  Generator  program,  INVCOUNT,  modified  by  the  user  to  include 
on-hand  quantity  counts,  and  input  to  the  Division  Stock  Reconciliation 
program,  INVDIV. 

File  and  record  specification  are  given  in  Table  6.24-1. 
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TABLE  6.2I+-I 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Division  Stock  Reconciliation  Card  File 


FD  NAME: 

None 

DATA  SET 

NAME:  DIVCD 

NUMBER  OF 

RECORD  FORMATS: 

1 

RECORD  SIZE: 

80  Characters 

FILE  ORGANIZATION:  Sequenced  by:  Item  Number 

Sequence  Number 


RECORD  FORMATS: 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

Reconciliation  Card  Record 

U 

1 

PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

I DENT. 

PROGRAM  NAME 

U2. 

NAME  FOR  FILE 

INVDIV 

Division  Stock  Reconciliation  Program 

R 

I-CARD-FILE 

INVCOUNT 

Inventory  Master  Card  Generator 

W 

0-PUNCH 

Note:  The  record  format  and  specification  is  the  same  as  for 

the  Inventory  Master  Card  File  (SYSOUT=B)  (see  Section 

6.22). 
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6. 25  Quantity  Adjustment  Transaction  File  (&QTYADJ) 


The  Quantity  Adjustment  Transaction  File  is  a temporary  disk  file. 

It  contains  80-character  standard  inventory  transactions  with  transaction 
codes  2A  and  3A.  These  transaction  are  created  by  the  Inventory  Quantity 
Adjustment  program  INVQTY,  and  are  used  to  update  the  Inventory  Master 
File.  This  process  reconciles  the  on-hand  quantities  on  the  file  with 
the  result  of  the  physical  inventory  count  procedure. 

File  and  record  specifications  are  given  in  Table  6.25-1. 
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TABLE  6.25-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Quantity  Adjustment  Transaction  File 


FD  NAME:  None 

DATA  SET  NAME:  &QTYADJ 

NUMBER  OF  RECORD  FORMATS;  2 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Sequenced  by:  Item  Number 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME  MAK.  NO,  MIN.  NO. 

2A,  3A  Quantity  Adjustment  Record  U 0 


PROGRAM  USE 


PROGRAM 

IDENT,  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


INVQTY  Inventory  Quantity  Adjustment 

DA200  User  Input  Processor 


W 0-FILE 

R I-TRANS-FILE 


Note:  Recqrd  formats  and  specifications  are  the  same  as  for 

the  Standard  Transaction  File,  &INVTRN,  (see  Section 

6.4). 


6-120 


6.26  Value  Adjustment  Transaction  File  (&VALADJ) 


The  Value  Adjustment  Transaction  File  is  a temporary  disk  file. 

It  contains  80-character  standard  inventory  transactions  with  trans- 
action codes  9A  and  9N.  These  transactions  are  created  by  the  Inventory 

Value  Adjustment  program  INWADJ,  and  are  used  to  update  the  Inventory 
Master  File.  This  process  reconciles  the  file  status  with  the  value 
of  the  on-hand  inventory. 

File  and  record  specifications  are  given  in  Table  6.26-1. 
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TABLE  6.26-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Value  Adjustment  Transaction  File 


FD  NAME:  None 

DATA  SET  NAME:  &VALADJ 

NUMBER  OF  RECORD  FORMATS:  2 

RECORD  SIZE:  80 

Characters 

FILE  ORGANIZATION:  Sequenced  by: 

Item  Number 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME 

MAX.  NO 

MJN.  NO. 

9A,  9N  Value  Adjustment  Record 

U 

0 

PROGRAM  USE 

PROGRAM 

PROGRAM  COBOL 

IDENT.  PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

INWADJ  Inventory  Value  Adjustment  W OUTFILE 

DA200  User  Input  Processor  R I-TRANS-FILE 


Note:  Record  formats  and  specifications  are  the  same  as  for  the 

Standard  Transaction  File,  &INVTRN,  (see  Section  6.4). 
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6.27  Vendor  File  Startup  Card  File  (VENDCD) 


The  Vendor  File  Startup  Card  File  is  a set  of  records  input  through 
the  job  stream  on  punched  cards.  It  contains  80-character  records  used 
to  initiate  vendor  information  on  the  Vendor  Reference  File.  This  file 
is  read  by  the  Vendor  Reference  File  Startup  Program,  VENDOl. 

File  and  record  specifications  are  given  in  Tables  6.27-1  and  6.27-2. 
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TABLE  6.27-1 


SIMS  INVENTORY  FILE  SPECIFICATION 


FILE  NAME:  Vendor  File  Startup  Card  File 

FD  NAME : None 

DATA  SET  NAME;  VENDCD 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION;  Random  Order 
RECORD  FORMATS: 

FORMAT 


CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

Vendor  Startup  Card  Record 

U 

1 

PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

I DENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  PILE 

VENDOl 

Vendor  Reference  File  Startup 

R 

INPUT-VENDOR-( 
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TABLE  6.27-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Vendor  Startup  Card  Record 

FILE  NAME:  Vendor  File  Startup  Card  File 

COBOL  NAME  OF  RECORD:  I-VENDOR-RECORD 


RECORD 

FORMAT  CODE; 

None 

RECORD 

LENGTH : 80 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

5 

9(5) 

I-VENDOR-NO 

Vendor  Number 

6 

6 

X(6) 

I -VENDOR-DATE 

Vendor  Startup  Date 

(mmddyy) 

12 

1+0 

X(l+0) 

I -VENDOR-NAME 

Vendor  Identification 

52 

X(29) 

FILLER 

TOTAL 

80 
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7.0  PROGRAM  DESCRIPTIONS 

This  section  describes  the  individual  programs  that  are  referenced 
in  the  System  Procedures  section  (Section  5*0) . The  source  listings 
of  these  programs,  with  the  exception  of  the  utility  programs,  are  con- 
tained in  Supplement  I to  this  document. 

The  program  included  in  the  SIMS  Inventory  System  are  listed  in 
Table  7-0-1  in  terms  of  program  identification,  program  name,  and  the 
subsection  that  describes  the  program.  The  description  of  a program 
includes : 

(a)  Introduction; 

(b)  Program  Flowchart; 

(c)  System  Interfaces; 

(d)  Program  Files; 

(e)  Processing  Functions;  and 

(f)  Error  Messages. 

The  Data  Acceptance  program  and  the  Inventory  Master  File  Edit/Up- 
date program  are  described  in  more  detail  than  the  report  generator 
programs,  as  the  reports  are  described  in  Section  3-0.  The  report 
generator  programs  use  the  COBOL  report  writer  and  descriptions  of  these 
programs  include  user  report  formats.  At  the  top  of  the  illustration 
of  each  report  format  are  rows  of  numbers  indicating  the  print  positions. 
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TABLE  T-0-1 


Subsection 
Number 

7.1 


7.2 


7.3 


7.i+ 


7.5 


7.6 


7.7 


7.8 


7.9 

7.10 

7.11 

7.12 
7.13 
7. lit 

7.15 

7.16 

7.17 

7.18 

7.19 

7.20 


INDEX  OF  SIMS  INVENTORY  PROGRAMS 


Program 

Identification 

Program  Name 

DA200 

User  Input  Processor 

DA300 

Data  Acceptance 

DG300 

Inventory  Master  File  Edit/Update 

RPOOO 

Transaction  History  File  Update 

RPOIOC 

Materials  Transaction  History  Report 
Generator 

RPOIOD 

Requested  Materials  Transaction 
History  Report  Generator 

RPOll 

Reorder  Notification  Report  Generator 

RP013 

Unfilled  Purchase  Orders  Report 
Generator 

RPOlU 

Vendor  Performance  Report  Generator 

RP016 

Division  Stock  Replacement  Report 
Generator 

RP017 

Stock  Status  Report  Generator 

RP018 

Low  Usage  Materials  Report  Generator 

RP020 

Inventory  Activity  Report  Generator 

RP022 

Outstanding  Purchase  Orders  Report 
Generator 

RP02U 

Vendor  File  List 

rpo6o 

Receiving  Report  Generator 

INVEST 

Inventory  Master  File  List 

DA250 

Price  Correction  Processor 

INWADJ 

Inventory  Value  Adjustment 

INVCADJ 

Inventory  Class  Master  File  Adjustment 
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TABLE  7.0-1  (CONCLUDED) 


Subsection 

Niomber 

Program 

Identification 

Program  Name 

7.21 

INVCOUNT 

Inventory  Master  Cajrd  Generator 

7.22 

INVQTY 

Inventory  Quantity  Adjustment 

7.23 

INVDIV 

Division  Stock  Reconciliation 

7.21+ 

VENDOl 

Vendor  Reference  File  Start-Up 

7.25 

lEBGENER 

Data  Set  Copy  Utility 

7.26 

lEHDASDR 

Disk  Save  Utility 

7.27 

lEBISAM 

ISAM  File  List  Utility 
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7 . 1 DA200  - User  Input  Processor 


The  User  Input  Processor  program  DA200  is  described  in  this  section 
is  illustrative  of  the  type  of  preprocessor  program  that  may  have  to  be 
incorporated  in  the  SIMS  Inventory  System  by  the  user.  The  Data  Ac- 
ceptance program  DA300,  described  in  Section  7.2,  has  been  designed 
to  accept  transactions  in  standard  record  formats.  If  the  system  user 
elects  to  prepare  input  records  using  the  standard  formats,  an  input 
preprocessor  program  is  unnecessary. 

The  program  described  in  this  section  was  specifically  designed  for 
ACTD.  It  performs  an  edit  check  of  the  house  item  number  when  the  initial 
inventory  transaction  for  an  item  is  entered  and  prints  a report  of 
invalid  numbers.  It  also  converts  issue  and  return  to  stores  (credit 
issue)  transactions  to  the  standard  SIMS  format. 

7.1.1  System  Interfaces 

Figure  7.1-1  is  a program  flowchart.  No  previously  created  files 
are  read  since  this  is  the  first  step  in  the  job  stream. 

Program  output  consists  of  the  edit  report.  Invalid  Item  Numbers, 
and  the  Standard  Transaction  File,  &INVTRN  (see  Section  6.4).  This 
data  set  contains  the  transaction  records  in  standard  SIMS  format. 

It  is  read  by  the  Data  Acceptance  program,  DA300. 

7.1.2  Program  Files 

No  internal  file,  other  than  the  print  file,  is  created  by  the 
program. 
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FIGURE  7.1-1 

DA200  PROGRAM  FLOWCHART 
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7.1.3  Processing  Functions 

As  Illustrated  In  Figure  7.1-1,  the  transaction  file  Is  read.  At 
ACID,  this  Is  a card  file.  The  transaction  code  In  the  Input  record 
Is  checked.  If  It  Is  other  than  one  of  the  five  transaction  codes 
specified  below,  the  record  Is  written  out  to  the  Standard  Transaction 
File  &INVTRN. 

If  the  transaction  Is  an  Item  Characteristics  record  Identified  by 
the  transaction  code  ’AA’ , the  functions  performed  are: 

(a)  the  Inventory  Class  code  Is  checked.  If  Its  value  Is 
'DC',  the  Input  record  Is  written  to  the  Standard  Trans- 
action File;  otherwise,  the  entire  House  Inventory  Number 
Is  tested  against  a table  containing  the  ranges  of  valid 
Item  numbers.  This  table  (see  Table  7.1-1)  Is  Included 
In  the  program  software;  and 

(b)  If  the  Item  number  Is  valid,  the  Input  record  Is 
written  to  the  Standard  Transaction  File;  otherwise,  the 
transaction  Is  rejected  and  Its  contents  are  printed  on 
the  report.  Invalid  Item  Numbers. 

Jf  the  transaction  code  Identifies  the  Input  record  as  an  Issue 
type  of  transaction — that  Is,  transaction  codes  8A,  8N,  LA,  IN — the 
Input  record  Is  converted  to  the  standard  SIMS  format.  The  reformat- 
ted record  Is  written  to  the  Standard  Transaction  File. 

When  all  Input  records  have  been  processed,  program  execution 
terminates . 

7.1.4  Error  Messages 

No  error  message  Is  generated  by  the  program. 
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02 

04 

05 

06 

07 

08 

17 

24 

26 

30 

32 

34 

35 

36 

37 

38 

39 

42 

43 

45 


TABLE  7.1-1 

VALID  INVENTORY  ITEM  NUMBERS 
AC  TRANSIT  DISTRICT 

RANGE  OF  VALID  ITEM  NUMBERS 
001001  - 005000 
005001  - 010000 
020001  - 025000 
025001  - 030000 
030001  - 035000 
035001  - 050000 
050001  - 065000 
100001  - 115000 
150001  - 175000 
185001  - 190000 
220001  - 230000 
240001  - 245000 
250001  - 255000 
255001  - 260000 
260001  - 265000 
265001  - 266000 
266001  - 267000 
267001  - 268000 
280001  - 285000 
285001  - 310000 
310001  - 325000 
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TABLE  7.1-1  (CONCLUDED) 


INVENTORY 

CLASS  RANGE  OF  VALID  ITEM  NUMBERS 


47 

325001  - 

330000 

50 

330001  - 

350000 

52 

350001  - 

370000 

60 

400001  - 

500000 

65 

525001  - 

530000 

75 

530001  - 

535000 

80 

550001  - 

551000 

99 

700000  - 

800000 
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7.1.5  Remarks 


The  program  written  for  ACTD  is  designated  by  the  name  DA200A.  A 
similar  program  was  written  for  Dallas  Transit  to  convert  that  property's 
transactions  to  standard  formats.  This  program  is  DA200D. 


I 
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7 . 2 DA300  - Data  Acceptance 


The  Data  Acceptance  program  (DA300)  is  designed  to: 

(a)  perform  preliminary  editing  of  inventory  transaction 
records; 

(b)  create  a file  of  inventory  transactions  with  an  associated 
19-character  sort  key.  The  sort  key  contains  the  inventory 
item  number,  transaction  date,  and  a format  code.  The  re- 
mainder of  the  output  transaction  consists  of  the  80-character 
input  transaction; 

(c)  edit  the  system  constants  and  vendor  name  transactions,  and 
maintain  the  Inventory  Constants  and  Vendor  Reference  files; 
and 

(d)  generate  three  reports,  which  are: 

(1)  Invalid  Transactions, 

(2)  Constants  File  Edit,  and 

(3)  Vendor  Reference  File  Update  and  Rejections. 

7.2.1  System  Interfaces 

Figure  7.2-1  is  a program  flowchart.  As  illustrated,  program  in- 
put consists  of: 

(a)  80-character  transaction  records  from  the  Standard  Trans- 
action File  &INVTRN.  These  records  have  been  reformatted 
from  user-specific  transactions  to  standard  inventory  formats 
by  the  User  Input  Processor  program  DA200; 

(b)  the  Inventory  Constants  File,  S. CONST; 

(c)  the  Vendor  Reference  File,  M. VENDOR;  and 

(d)  the  Suspense  File,  SUSPFILE(O).  This  file  contains  standard 
80-character  transactions  that  could  not  be  processed  during 
the  last  system  execution  due  to  violation  of  file  update 
criteria.  This  file  was  created  during  the  last  system  run 
by  the  Inventory  Master  File  Edit/Update,  DG300,  and  the  Re- 
order Notification  Program,  RPOll. 
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FIGURE  7.2-1 

DA300  PROGRAM  FLOWCHART 
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Program  output  consists  of  the  updated  constants  and  vendor  file, 
three  reports  (listed  above),  and  the  Temporary  Storage  Transaction  File 
M.SRTEMP.  This  is  a file  of  sorted  transactions  read  by  the  Inventory 
Master  File  Edit/Update  program,  DG300. 

7.2.2  Program  Files 

The  program  creates  no  internal  files. 

7.2.3  Processing  Functions 

As  illustrated  in  Figure  7.2-1,  the  Suspense  File  and  Input  Trans- 
action File  are  read.  Each  transaction  is  edited  to  determine  the  trans- 
action code.  There  are  three  general  classes  of  transactions:  inventory 

transactions,  non- inventory  materials  transactions,  and  constants  and  ven- 
dor transactions.  Non- inventory  materials  consist  of  free  stores  items 
and  materials  charged  directly  to  expense  accounts. 

7. 2. 3.1  Inventory  Transactions 

If  a transaction  is  an  inventory  transaction,  a 99-character  record 
is  created.  The  new  record  contains  a 19-character  sort  key  and  the  80- 
character  input  transaction.  The  sort  key  consists  of  the  inventory  item 
number,  the  transaction  date,  and  an  internal  sort  code.  Table  7.2-1 
describes  the  various  inventory  transactions  that  may  be  input,  and  the 
associated  sort  code. 

In  creating  the  sort  key,  a check  is  made  on  the  transaction  code. 

If  the  code  is  not  a valid  value,  the  transaction  is  rejected  and  displayed 
on  the  Invalid  Transactions  report. 

The  input  transactions  are  read  from  two  sources,  the  Suspense  File 
and  the  Standard  Transaction  File.  The  records  from  the  Suspense  File  are 
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TABLE  7.2-1 


INVENTORY  TRANSACTION  CODES 


TRANSACTION  CODE 

SORT  CODE 

r\A 

01 

A.X 

02 

BA 

03 

BX 

04 

DA 

07 

DX 

08 

EA 

09 

8N.8A 

10,26 

0 A , ON 

12,13 

lA.lN 

14,31 

2A,2N,3A 
3N , 4 A , 4N 

15,16,17 

18,19,20 

6A,6N 

21,22 

7A.7N 

23,24 

9A.9N 

27,28 

RS 

29 

OX 

33 

TRANSACTION  TYPE 
Item  Characteristics 
Item  Delete 
Item  Description 
Item  Description  Delete 
Division  Stock  Level 
Division  Stock  Level  Delete 
Average  Unit  Price  Change 
Materials  Issue 
Purchase  Order 
Return'  to  Stores 
Quantity  Adjustment 

Materials  Receipt 
Vendor  Return 
Value  Adjustment 
Reorder  Status 


Purchase  Order  Delete 


processed  first.  When  all  transactions  have  been  processed  from  this 
file,  the  program  reads  the  second  file.  When  all  transactions  from  both 
files  have  been  processed,  program  execution  is  terminated. 

The  resultant  99-character  transactions  are  sequenced  via  the  COBOL 
internal  sort  routine.  The  records  are  in  increasing  order  by  item  number, 
transaction  date,  and  sort  code,  The  file  containing  these  records  is 
the  Temporary  Storage  Transaction  File,  M.SRTEMP.  This  file  is  then  read 
by  the  Inventory  Master  File  Edit/Update  program  DG300. 

7. 2. 3. 2 Non- Inventory  Materials  Transactions 

Transactions  for  direct  charge  and  free  stores  items  are  treated  in 
a special  way  by  the  program.  Direct  charge  items  are  those  with  an  item 
number  beginning  with  'DC'.  Free  stores  items  are  those  with  the  charac- 
ter 'F'  in  the  model  code  field  (character  three  of  the  item  number).  In 
addition  to  the  standard  procedures  defined  in  Section  7.2. 3.1  above,  cer- 
tain data  are  edited,  and  additional  transactions  are  created  by  the 
program.  Specific  actions  taken  are  as  follows; 

(a)  For  DC  items  only,  all  Purchase  Order  (OA)  transactions  are 
edited  to  assure  valid  field  contents.  If  the  transaction 
passes  these  checks,  an  Item  Characteristics  (AA)  transaction 
is  created.  The  processing  of  this  transaction  creates  the 
basic  Inventory  Master  File  records  for  the  item.  The  purchase 
order  transaction  can  then  by  processed;  and 

(b)  For  DC  and  F items,  a transaction  is  created  when  one  of  the 
types  of  transactions  specified  below  is  encountered.  The 
transaction  created  offsets  the  input  transaction  so  that 
there  is  no  effect  on  the  Inventory  Master  File  records. 


7-14 


These  transactions,  and  the  offsetting  transactions  are: 


Original  System  Generated 


Code 

IZ£e 

Code 

Type 

6A,  6N 

Materials  Receipt 

8A,  8N 

Materials  Issue 

7A,  7N 

Vendor  Return 

lA,  IN 

Return  to  Stores 

The  Purchase  Order  number,  from  the  input  record,  is  stored  in  the 
record  created  in  each  case.  This  indicates  to  the  Inventory  Master  File 
Edit/Update  program  DG300  that  the  transaction  has  been  created  by  the 
system. 

7. 2. 3. 3 Constants  File  and  Vendor  File  Update 

When  a. transaction  is  encountered  that  will  update  the  Inventory 
Constants  File  or  the  Vendor  Reference  File,  edit  checks  are  made  on  the 
field  contents.  If  the  transaction  is  in  error,  it  is  displayed  on  an 
appropriate  report.  If  the  transaction  is  valid,  the  associated  file  is 
updated  in  accordance  with  the  data  coded. 

A transaction  code  FA  causes  the  Inventory  Constants  File  to  be  up- 
dated. The  file  contains  a single  record  that  is  read  into  program 

working  storage.  If  the  file  is  empty,  a record  is  created  in  working 
storage  by  the  program.  When  the  record  has  been  updated  by  replacing 

the  file  values  with  ones  coded  in  the  transaction,  the  file  is  rewritten 
using  the  revised  record. 

Table  7.2-2  describes  the  edit  criteria  against  which  the  FA  trans- 
action is  checked.  Default  values  that  are  assigned  to  constants  that 
are  not  coded  by  the  user  are  also  described. 


7-15 


TABLE  7.2-2 


CONSTANTS  TRANSACTION  EDIT  CRITERIA 


Transaction 


FA 


Edit  Criteria  Default  Value 

Reorder  Notice  Interval-must  30 

be  numeric  or  spaces 

Low  Use  Interval-must  be  365 

numeric  or  spaces 


Sales  Tax  Factor-must  be  l.OOQO 

numeric  or  spaces.  If  numeric, 
must  be  greater  than  or  equal 
to  1.000 


Number  of  Vehicles 


100 


Unfilled  Purchase  Order  365 

Interval-must  be  number  or  spaces 


Markup  Factor -must  be  spaces 
or  numeric 


Not  Used 


Direct  Charge  Purge  Factor 
must  be  spaces  or  numeric.  If 
numeric  must  be  between  17  and 
36 


17 


Purchase  Order  Purge  Factor 
must  be  spaces  or  niomeric.  If 
numeric  must  be  between  15  and 
60 


17 
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If  a transaction  fails  to  meet  the  edit  criteria,  it  is  rejected 
and  displayed  on  the  Constants  Fi^  Edit  report.  If  the  transaction 
passes  the  criteria,  it  is  processed  and  the  resultant  file  record  is 
displayed  on  the  Constants  File  Edit  report. 

A transaction  code  of  CA  or  CX  causes  the  Vendor  Reference  File  to 
be  updated.  These  transactions  are  edited  against  edit  criteria  as  dis- 
played in  Table  7.2-3. 

If  the  transaction  fails  the  edit  criteria,  it  is  rejected  and  dis- 
played on  the  Vendor  Reference  File  Update  and  Rejections  report.  If  the 
transaction  is  »alid,  the  appropriate  update  criteria  is  performed.  For 
the  CA  transaction,  two  actions  may  occur:  an  existing  vendor  number  will 

have  the  associated  name  changed,  or  a new  vendor  number  and  name  is 
added  to  the  file.  For  the  CX  transaction  one  action  is  initiated;  the 
coded  vendor  is  deleted  from  the  file. 

The  results  of  the  file  updating  caused  by  these  transactions  are 
displayed  on  the  Vendor  Reference  File  Update  and  Rejections  report. 

7.2.4  Error  Messages 

No  error  messages  are  printed  by  this  program. 

7.2.5  Remarks 

If  no  transactions  are  passed  on  from  DA300,  a return  code  of  8 is 
set.  This  will  prevent  the  execution  of  subsequent  job  steps. 

The  reports  of  constants  updates  and  vendor  updates  are  produced 
only  if  appropriate  transactions  are  found  by  the  program. 
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TABLE  7.2-3 


VENDOR  TRANSACTION 

EDIT  CRITERIA 

Transaction 

Code  Type 

Edit  Criterion 

CA  Vendor  Name 

Vendor  Number — must  be  numeric. 
Vendor  Name — must  not  be  all  spaces 

CX  Vendor  Name  Delete 

Vendor  Number — must  be  numeric, 
and  the  number  must  be  on  the  Ven- 
dor Reference  file. 

Vendor  Name — must  be  equal  to 
spaces . 

7-18 


7 . 3 DG300  - Inventory  Master  File  Edlt/Update 


The  Inventory  Master  File  Edit/Update  program  (DG300)  is  designed  to: 

(a)  edit  inventory  transactions — each  transaction  is  checked  to  de- 
termine if  it  meets  specified  edit  criteria.  If  any  field  is  in 
error,  the  entire  transaction  is  rejected.  The  rejected  trans- 
action is  displayed  on  the  edit  list. 

(b)  update  the  Inventory  Master  File — the  program  reads  the  set  of 
records  for  an  item  number.  If  no  transactions  are  to  be  pro- 
cessed against  this  number,  the  records  are  written  to  the  new 
version  of  the  Inventory  Master  File.  If  a transaction  is  pres- 
ent, it  is  tested  against  additional  criteria.  If  it  fails  to 
meet  these  criteria,  it  is  either  rejected,  or  passed  to  the 
Temporary  Suspense  File  for  processing  during  subsequent  runs. 

If  the  transaction  meets  these  criteria,  the  appropriate  master 
file  records  are  updated.  The  modified  records  are  written  to 
the  new  version  of  the  Inventory  Master  File. 

(c)  update  the  Inventory  Class  Master  File — this  file  contains  a 
set  of  Monthly  Activity  records  for  each  class  of  items  on 
the  Inventory  Master  File.  These  records  are  updated  whenever 
a comparable  inventory  item  record  is  updated. 

(d)  move  modified  transactions  and  master  file  data  to  one  or  more 
files  created  by  the  program.  These  files  are  used  in  sub- 
sequent job  steps.  The  files  are: 

(1)  the  Inventory  Active  Master  File — this  file  contains  In- 
ventory Master  File  records  for  those  item  numbers  against 
which  transactions  were  processed  during  the  current  system 
execution. 

(2)  the  Temporary  Suspense  File — this  file  contains  records 
of  user-supplied  transactions  that  although  valid  ac- 
cording to  edit  criteria,  did  not  meet  certain  update 
criteria  and,  therefore,  could  not  be  processed  during 
the  current  system  run. 

(3)  the  Current  Transaction  File — this  file  contains  records 
of  user  input  transactions  processed  during  the  current 
system  run. 

(4)  the  Purchase  Order  Transaction  File — this  file  contains 
records  of  Purchase  Order  transactions  processed  during 
the  current  system  run.  The  records  are  in  the  format 
necessary  for  input  to  the  Receiving  Report  Generator 
program,  RP060. 
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(e)  generate  the  Inventory  Transaction  Edit  report — rejected  trans- 
actions are  displayed  with  an  asterisk  printed  under  the  right- 
most character  of  the  fields  in  error.  An  indicative  message 
explaining  the  error  is  also  printed. 

(f)  generate  the  Inventory  Suspense  File  Contents  report — trans- 
actions that  have  been  written  to  the.  Temporary  Suspense  File 
are  displayed. 

(g)  generate  the  Purged  Items  and  Open  Purchase  Orders  report — 
the  file  records  for  item  numbers  that  have  been  marked  for 
purging  are  displayed,  along  with  any  open  Purchase  Order 
records  being  deleted.  These  deletions  are  from  the  Inventory 
Master  File. 

7.3.1  System  Interfaces 

Figure  7.3-1  is  a program  flowchart.  As  illustrated,  program  inputs 
consist  of: 

(a)  the  Temporary  Storage  Transaction  File,  CN1744. INV.M. SRTRANS. 
The  file  contains  the  99-character  transaction  records  created 
by  the  Data  Acceptance  program,  DA300.  The  transactions  are 
sorted  by  inventory  item  number  to  permit  sequential  processing 
against  the  Inventory  Master  File. 

(b)  the  Inventory  Master  File,  CNl 744. INV.M. INVENT.  This  file  is 
a generation  data  set.  The  version  read  is  the  most  current 
version,  version  (0) . 

(c)  the  Inventory  Class  Master  File,  CN1744.INV.M. INVCLASS . This 
file  is  a generation  data  set.  The  version  read  is  the  most 
current  version,  version  (0) . 

(d)  the  Inventory  Constants  File,  CN1744. INV. S . CONST.  This  file 
contains  a single  record  that  contains  the  various  system 
constants. 

Program  output  consists  of  the  Inventory  Transaction  Edit  report, 
the  Inventory  Suspense  File  Contents  report,  the  Purged  Items  and  Open 
Purchase  Orders  report,  and  six  new  data  sets.  They  are: 

(a)  the  Inventory  Master  File,  CN1744. INV.M. INVENT (+1) . This  is 
the  updated  version  of  the  file  that  has  resulted  from  the 
processing  of  the  current  transaction  data.  This  file  is  read 
by  the  following  programs: 
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FIGURE  7.3-1 

DG300  PROGRAM  FLOWCHART 
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(1)  RPOIOD  - Requested  Materials  Transaction  History  Report 
Generator 

(2)  RP013  - Unfilled  Purchase  Orders  Report  Generator 

(3)  RP014  - Vendor  Performance  Report  Generator 

(4)  RP017  - Stock  Status  Report  Generator 

(5)  RP018  - Low  Usage  Materials  Report  Generator 

(6)  RP022  - Outstanding  Purchase  Orders  Report  Generator 

(7)  INVLST  - Inventory  Master  File  List 

(8)  INWADJ  - Inventory  Value  Adjustment  Program 

(9)  INVCADJ  - Inventory  Class  Master  File  Adjustment  Program 

(10)  INVCOUNT  - Inventory  Master  Card  Generator 

(11)  INVQTY  - Inventory  Quantity  Adjustment  Program 

(12)  INVDIV  - Division  Stock  Reconciliation  Program 

(b)  the  Inventory  Class  Master  File,  CN1744. INV.M. INVCLASS(+1) . 

This  is  the  updated  version  of  this  file.  It  is  read  by 
the  Inventory  Activity  Report  Generator  program,  RP020,  and 
the  Inventory  Class  Master  File  Adjustment  program,  INVCADJ. 

(c)  the  Inventory  Active  Master  File,  CN1744 . INV.M. INVACTV.  This 
file  contains  file  records  from  the  Inventory  Master  File  for 
those  item  numbers  against  which  transactions  were  processed 
during  the  most  recent  system  run.  It  is  read  by  the  Materials 
Transaction  History  Report  Generator,  RPOlOCi  Reorder  Noti- 
fication Report  Generator,  RPOll;  and  the  Division  Stock  Re- 
placement Report  Generator,  RP016. 

(d)  the  Temporary  Suspense  File,  CN1744. INV.M. INVSUSPN.  This  file 
contains  records  of  transaction  data  that  could  not  be  pro- 
cessed during  the  most  recent  system  run.  The  transactions 
could  not  be  handled  due  to  violation  of  file  update  criteria. 
The  transactions  in  this  file  are  reprocessed  during  the  next 
system  run.  The  file  is  read  by  the  Reorder  Notification  Report 
Generator  program,  RPOll. 
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(e)  the  Purchase  Order  Transaction  File,  CN17A4. INV.M.POTRANS. 

This  file  contains  records  of  Purchase  Order  transactions 
that  have  been  modified  for  input  to  the  Receiving  Report 
Generator  program,  RP060. 

(f)  the  Current  Transaction  File,  CN1744. INV.M.TRANDISK(+1) . 

This  file  contains  the  transaction  data  that  were  processed 
during  the  most  recent  system  execution.  It  is  read  by  the 
Transaction  History  File  Update  program,  RPOOO;  the  Materials 

‘ Transaction  History  Report  Generator,  RPOIOC;  and  the  Division 

Stock  Replacement  Report  Generator,  RP016. 

7.3.2  Program  Files 

The  program  produces  no  internal  file. 

7.3.3  Processing  Functions 

The  program  reads  the  Temporary  Storage  Transaction  File,  M.SRTEMP, 
and  uses  its  contents  to  update  the  Inventory  Master  File  and  the  Inventory 
Class  Master  File. 

The  control  for  the  program  is  on  inventory  item  number  and  class 
code.  The  set  of  file  records  is  read  for  an  item  number.  If  no  trans- 
action is  present  for  this  number,  the  records  are  passed  directly  to  the 
new  version  of  the  Inventory  Master  File.  Then  the  Class  Master  File  is 
read  to  find  the  associated  records  for  the  class  referenced  in  the  trans- 
action. If  no  transactions  are  present  for  a class  on  file,  the  file  records 
are  written  to  the  new  version  of  the  Class  Master  File. 

When  a match  has  occurred  for  both  the  item  number  and  class  number, 
the  file  records  are  moved  to  working  storage  and  updated  via  the  transaction 
data.  The  file  records  are  written  to  the  new  version  of  the  Inventory  Master 
File  when  all  transactions  for  that  item  number  have  been  processed.  The 
file  records  for  the  Class  Master  File  are  not  output  until  all  transactions 
for  that  class  code  have  been  processed.  For  each  class  code,  several  item 
numbers  within  that  class  may  be  referenced. 


7-23 


7. 3. 3.1  Edit  and  Update  Criteria 

Each  transaction  is  checked  to  determine  if  it  meets  specified  edit 
criteria.  These  criteria  are  described  in  Table  7.3-1.  If  the  trans- 
action fails  to  meet  the  associated  criteria,  it  is  rejected  and  dis- 
played on  the  Inventory  Transaction  Edit  report.  An  asterisk  is  printed 
under  each  field  in  error  and  an  indicative  error  message  is  printed. 

The  edited  transaction  passes  to  the  update  section  of  the  program. 
The  transaction  is  checked  to  determine  if  it  meets  additional  criteria. 
These  criteria  are  described  in  Table  7.3-3.  If  the  transaction  fails 
to  meet  the  update  criteria,  one  of  two  actions  is  taken.  If  the  trans- 
action is  in  error,  it  is  rejected  and  displayed  on  the  Inventory  Trans- 
action Edit  report.  An  indicative  message  is  printed  to  explain  the 
rejection.  These  messages  are  described  in  Table  7.3-4.  If  the  trans- 
action is  valid  but  cannot  be  processed  due  to  the  status  of  the  file 
records,  it  is  spooled  to  the  Temporary  Suspense  File,  M.INVSUSPN.  This 
file  saves  transactions  for,  processing  during  subsequent  system  runs  when 
the  file  status  may  permit  updatipg. 

7 . 3 . 3 . 2 Update  Procedures 

If  the  transaction  meets  both  edit  and  update  criteria,  the  appro- 
priate Inventory  Master  File  and  Class  Master  File  records  are  updated 
(or  created)  and  written  out  to  the  new  versions  of  these  files.  In 
addition,  the  Inventory  Master  File  records  for  those  item  numbers 
against  which  transactions  were  processed  are  passed  to  the  Inventory 
Active  Master  File,  M.INVACTV.  This  file  is  used  by  the  Reorder  Notifi- 
cation Report  Generator,  RPOll;  the  Division  Stock  Replacement  Report 
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TABLE  7.3-1 


INVENTORY  TRANSACTION  EDIT  CRITERIA 


Transaction 


Code  Type 


Edit  Criteria 


All  inventory  transactions  must  meet 
the  following  criterion  in  addition 
to  those  listed: 

Transaction  date  must  be  numeric 
and  not  greater  than  the  processing 
date. 


AA  Item  Characteristics  Unit  of  Issue — must  be  a valid  unit 

of  issue  (see  Table  7.3-2). 

Reorder  Point — must  be  numeric  or 
equal  to  'AR'  or  'DNR' . 

Sales  Tax  Factor — must  be  spaces  or 
numeric.  If  numeric,  the  value  must 
be  greater  than  or  equal  to  1.0000. 

All  other  inventory  transactions 
must  meet  the  following  criterion 
in  addition  to  those  listed: 

Inventory  Item  Number — must  be  on 
file  in  the  Inventory  Master  File. 


OA  Purchase  Order  Purchase  Order  Number — must  be 

numeric . 

Delivery  Date — must  be  spaces  or 
numeric.  If  numeric,  the  month  must 
be  between  1 and  12,  and  day  be- 
tween 1 and  31. 

Unit  of  Issue — must  be  same  as  unit 
of  issue  on  file  for  that  item 
number . 

Purchase  Order  Quantity — must  be 
spaces  or  numeric. 
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TABLE  7.3-1  (Continued) 


Transaction 


Code  Type 


Edit  Criteria 


Purchase  Order  Price — must  be  spaces 
or  numeric. 

Account  Number — must  be  spaces  or 
numeric. 

Sub-account  Number — must  be  spaces 
or  numeric. 

Work  Order  Number — must  be  spaces 
or  numeric. 

Equipment  Number — must  be  spaces 
or  numeric. 

Fleet  Charge — must  be  spaces  or 
numeric. 


ON  Purchase  Order  Purchase  Order  Number — must  be 

numer ic . 

Unit  of  Issue — must  be  same  as  the 
unit  of  issue  on  file  for  that 
item  number. 

Purchase  Order  Price — must  be  spaces. 

Purchase  Order  Quantity — must  be 
numeric . 


All  other  inventory  transactions 
must  meet  the  following  criteria 
in  addition  to  those  listed  ; 

Transaction  Date — must  be  greater 
than  or  equal  to  the  data  in  the 
oldest  Monthly  Activity  (60)  record 
in  both  the  Inventory  Master  File 
and  the  Inventory  Class  Master  File. 
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TABLE  7.3-1  (Continued) 


Transaction 


Code  Type 


Edit  Criteria 


OX 

Purchase  Order  Delete 

Purchase  Order  Number — must  be 
numeric . 

Purchase  Order  Quantity — must  be 
spaces . 

Purchase  Order  Price — must  be 
spaces . 

BA 

Item  Description 

No  additional  criterion. 

Item  Description  Delete 

Deletion  Indicator — must  be  equal 
to  one  (1)  or  two  (2). 

DA 

Division  Stock 

Division  Store — must  be  numeric. 

Division  Stock  Level — must  be 
numeric. 

DX 

Division  Stock 
Delete 

Division  Store — must  be  numeric. 

LA 

Average  Unit  Price  Change 

Unit  of  Issue — must  be  equal  to 
the  unit  of  issue  on  file  for 
that  item  number. 

Average  Unit  Price — must  be 
numeric. 

9A,9X 

Value  Adjustment 

Adjustment  Voucher  Number — must 
be  spaces  or  numeric. 

Adjustment  Value — must  be  numeric, 
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TABLE  7.3-1  (Continued) 


Transaction 

Code 

Type 

Edit  Criteria 

RS 

Reorder  Status 

Reorder  Notice  Number — must  be 
spaces  or  numeric. 

AX 

Item  Deletion 

No  additional  criteria 

6A  , 6N 

!Iaterials  Receipt 

Purchase  Order  Number — must  be 
numeric . 

Unit  of  Issue — must  be  the  same 
as  unit  of  issue  on  file  for  that 
item  number. 

Receipt  Quantity — must  be  numeric. 

7 A,  7N 

Vendor  Return 

Shipping  Notice  Number — must  be 

spaces  or  numeric. 

Vendor  Code — must  be  spaces  or 
numeric. 

Purchase  Order  Number — must  be 
numeric . 

Account  Number — must  be  spaces  or 
numer ic . 


Return  Quantity — must  be  numeric. 

Unit  of  Issue — must  be  same  as  on 
file  for  that  item  number. 


All  other  inventory  transactions 
must  meet  the  following  criterion 
in  addition  to  those  listed. 

Unit  of  Issue — must  equal  the  unit 
of  issue  on  file  for  that  item 
number . 
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TABLE  7.3-1  (Concluded) 


Transaction 


Code  Type 


Edit  Criteria 


If  the  unit  of  issue  test  fails,  the 
transaction  is  processed  but  is  dis- 
played on  the  Inventory  Transaction 
Edit  report. 


2A,2W  'quantity  Adjustment  Adjustment  Voucher  Number — must  be 

3A,3N  spaces  or  numeric. 

4 a , AN 

Adjustment  Quantity — must  be  numeric. 


8A,8N  Materials  Issue 

1A,1N  and  Credit 


Unit  Code — must  be  spaces  or 
numeric. 

Work  Order  Number — must  be  spaces 
or  numeric. 

Account  Number — must  be  spaces  or 
numeric . 

Equipment  Division — must  be  spaces 
or  numeric. 

Vehicle  Number — must  be  spaces  or 
numeric . 

Fleet  Charge — must  be  spaces  or 
numeric. 

Issue  Division — must  be  spaces  or 
numeric . 


Issue  Quantity — must  be  numeric. 

Group  Number — must  be  spaces  or 
numeric . 


TABLE  7.3-2 


Assembly 

Bag 

Bale 

Ball 

Bar 

Barrel 
Board  Foot 
Book 
Bottle 
Box 

Bundle 

Bushel 

Cake 

Can 

Carboy 

Card 

Carton 

Cartridge 

Case 

Coil 

Cone 

Cubic  Foot 

Cubic  Yard 

CWT 

Dozen 

Drum 

Each 

Envelope 
Foot 
Gallon 
Gross 
Gross  Ton 
Gross  Yard 
Half  Pint 
Hundred 

Hundred  Weight 

Hank 

Inch 

Jar 

Keg 

Kilogram 

Kit 

Layout 


VALID  UNIT  OF  ISSUE  CODES 


AS 

Length 

LH 

BG 

Light 

LT 

BA 

Lineal  Foot 

LF 

BL 

Liter 

LL 

BR 

Load 

LD 

BB 

Nail 

NA 

BF 

Net  Ton 

NT 

BK 

Ounce 

OZ 

BT 

Meter 

ME 

BX 

Package 

PK 

BD 

Pad 

PD 

BU 

Pail 

PL 

CK 

Pair 

PR 

CN 

Peck 

PE 

CB 

Piece 

PC 

CR 

Pint 

PT 

CT 

Portion 

PO 

CG 

Pound 

LB 

CS 

Quart 

QT 

CL 

Quarter 

QR 

CO 

Quire 

QU 

CF 

Rack 

RK 

CY 

Ream 

RM 

CW 

Reel 

RE 

DZ 

Red 

RD 

DM 

Roll 

RL 

EA 

Scruple 

SR 

EN 

Section 

SC 

FT 

Set 

SE 

GL 

Sheet 

SH 

GR 

Skein 

SK 

GT 

Spool 

SL 

GY 

Square  Foot 

SF 

HP 

Square  Yard 

SY 

C 

Strip 

ST 

HW 

Suit 

SU 

HK 

Tank 

TK 

IN 

Thousand 

M 

JR 

Ton 

TN 

KE 

Troy  Qunce 

TO 

KG 

Tube 

TU 

KT 

Yard 

YD 

LO 
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TABLE  7.3-3 


INVENTORY  TRANSACTION  UPDATE  CRITERIA 


Transaction 

Code 

Type 

Update  Criteria 

The  violation  of  update  criteria 
can  result  in  one  of  two  program 
actions.  Either  the  transaction 
is  rejected  or  the  transaction 
is  passed  to  the  Temporary  Suspense 
File.  Unless  otherwise  noted,  the 
action  taken  is  rejection  of  the 
transaction. 

AX 

Item  Deletion 

On-hand  and  on-order  quantities 
in  the  Stock  Status  (53)  record 
must  be  zero. 

BX 

Item  Description 
Delet ion 

Deletion  Indicator — a correspond- 
ing Item  Description  (Al,42)  rec- 
ord must  exist  on  file. 

DA 

Division  Stock 

Record  Count — no  more  than  20 
Division  Stock  Status  (49)  records 
may  be  saved  on  file. 

DX 

Division  Stock 
Delete 

Division  Number — a corresponding 
Division  Stock  Status  (49)  record 
must  be  on  file. 

OA 

Purchase  Order 

If  corresponding  Purchase  Order 

Status  (55)  record  does  not  exist 
on  file: 


(a)  Purchase  Order  quantity  and 
price  must  be  numeric. 
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TABLE  7.3-3  (Continued) 


Transaction 


Code  Type  Update  Criteria 


If  a corresponding  record  does 
exist: 

(a)  purchase  or(Jep  price  must  be 
spaces  or  equal  to  the  file  value 
unless  the  cumulative  receipts 
for  this  Purchase  Order  are  zepo. 


ON  Purchase  Order  Purchase  Order  Number — a corres" 

ponding  Purcl^ase  Order  Status 
(55)  record  mugt  be  on  file. 

Order  Quantity — this  value  must 
be  not  greater  than  the  order 
quantity  in  the  Purchase  Order 
Status  (55)  record, 


OX  Purchase  Order  Delete  Purchase  Order  Number — a corre- 

sponding Purchase  Order  Status  (55) 
record  must  be  on  file* 

Cumulative  receipts  on  file  must 
be  zero  for  this  purcfjase  order 
number. 


6A,  7N  Materials  Receipt  and  Purchase  Ordejr  Number — a corre- 

Vendor  Return  spending  Purchase  Order  Status 

(55)  record  must  be  on  file. 


6N,7A  Materials  Receipt  and  Purchase  Order  Number — a corre- 

Vendor  Return  spending  Purchase  Order  Status 

(55)  record  must  be  on  file. 

The  quantity  returned  may  not  be 
greater  than  the  cumulative  re»^ 
ceipts  on  file. 
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TABLE  7.3-3  (Concluded) 


Transaction 


Code  Type 


Update  Criteria 


The  quantity  returned  must  not  be 
greater  than  the  on-hand  quantity, 
or  else  the  transaction  is  sent  to 
the  Temporary  Suspense  File. 


3A,21'J,4A  Quantity  Adjustment  Tlie  adjustment  quantity  must  be 

less  than  or  equal  to  the  quantity 
on-hand.  If  not,  the  transaction 
is  sent  to  the  Temporary  Suspense 
File. 


8A,lh' 


Materials  Issue  and  If  the  quantity  issued  is  greater 

Credit  than  the  quantity  on-hand,  the 

transaction  is  sent  to  the  Tem- 
porary Suspense  File. 
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TABLE  7.3-4 


TRANSACTION  ERROR  MESSAGES 


MESSAGE  TRANSACTION  REASON 


U/M  Test 

2A,2N, 

4A,4N, 

8A,8N 

3A,3N 

1A,1N 

The  unit  of  issue  was  net  the  same  as 
that  on  file  for  the  item  number.  The 
transaction,  however,  is  processed. 

DATE  RANGE 

All  except  for 
OA  and  ON 

The  transaction  date  was  previous  to 
the  date  in  the  oldest  Monthly  Activity 
(60)  record  on  the  Inventory  Master  or 
Inventory  Class  Master  Files. 

RECORD  LIMIT 

DA 

The  transaction  would  result  in  the 
creation  of  more  Division  Stock  Status 
(49)  records  than  may  be  kept  on  file. 
A maximum  of  20  may  be  on  file. 

DATA  NOT 
ON  FILE 

BX 

Item  Description  (41,  42)  record  for 
deletion  not  on  file. 

DX 

Division  Stock  Status  (49)  record  for 
deletion  not  on  file. 

OX 

Purchase  Order  Status  (55)  record  for 
deletion  not  on  file. 

6A,  6N 
7A,7N, 
ON 

Purchase  Order  Status  (55)  record  for 
updating  not  on  file. 

QTY  ON  FILE 

AX 

Item  number  for  deletion  has  a non- 
zero on-hand  or  on-order  quantity. 

OX 

Purchase  Order  Status  (55)  record  for 
deletion  has  a non-zero  cumulative 
receipts  value. 

ILLEGAL  UPDATE 

OA 

For  a new  Purchase  Order,  either  the 

order  quantity  or  price  is  spaces. 
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TABLE  7.3-4  (Concluded) 


MESSAGE 


TRANSACTION  REASON 


For  an  existing  Purchase  Order  Status 
(55)  record,  an  attempt  was  made  to 
change  the  order  price  after  receipts 
have  been  recorded. 

ON  Purchase  Order  quantity  in  transaction 

is  greater  than  order  quantity  in  the 
Purchase  Order  Status  (55)  record. 

6N,7A  Quantity  returned  is  greater  than  quan- 

tity received  in  the  Purchase  Order 
Status  (55)  file  record. 


Generator,  RP016;  and  the  Transaction  History  Report  Generator,  RPOIOC. 
Three  other  files  are  created  during  the  program  execution,  the  Current 
Transaction  File,  the  Purchase  Order  Transaction  File,  and  the  Temporary 
Suspense  File.  The  processing  functions  that  create  these  files  are 
described  later  in  this  section. 

The  updating  procedures  against  the  Inventory  Master  File  are  de- 
scribed below.  If  the  procedures  also  affect  the  Inventory  Class  Master 
File,  a note  is  made  of  this  occurance. 

Item  Characteristics  (AA) ; This  transaction  contains  information 
that  identifies  the  inventory  item.  Updating  procedures  are: 

(a)  If  the  transaction  defines  an  item  number  not  previously  on 
file,  the  Header  (40),  Reorder  Status  (50),  and  Stock  Status 
(53)  records  are  created.  The  information  from  the  trans- 
action is  incorporated  in  the  Header  Record  with  the  exception 
of  the  reorder  point,  which  is  stored  in  the  Reorder  Status 
record.  Non-referenced  fields  are  zero-filled. 

In  addition,  if  records  do  not  exist  on  the  Inventory  Class 
Master  File  for  the  class  to  which  the  item  belongs,  the 
Stock  Status  (53)  record  is  created  for  the  new  class. 

(b)  If  the  transaction  is  against  an  item  already  on  file,  values 
coded  in  the  transaction  update  the  Header  (40)  record.  If  a 
change  in  reorder  point  is  coded,  the  value  is  placed  in  the 
Reorder  Status  (50)  record  and  the  reorder  notice  indicator 
and  date  are  zeroed  out. 

Item  Deletion  (AX) ; The  entry  of  this  transaction  causes  all  file 
records  for  the  item  number  to  be  deleted  from  the  file.  The  data  that 
is  deleted  is  displayed  on  the  Purged  Items  and  Open  Purchase  Orders 
report. 

Item  Description  (BA):  The  entry  of  this  transaction  causes  the 

Item  Description  (41,  42)  records  to  be  updated.  If  these  records  do  not 
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exist  on  file,  they  are  created.  The  transaction  contains  an  item  de- 
scription that  is  60  characters  long.  The  first  30  characters  are  placed 
in  the  41  record.  If  more  than  30  characters  are  coded,  the  remainder 
are  placed  in  the  42  record. 

Item  Description  Deletion  (BX):  The  entry  of  this  transaction 

causes  the  deletion  of  the  Item  Description  (41,42)  records  from  the 
Inventory  Ilaster  File.  A deletion  indicator  is  coded  in  column  80  of 
the  transaction.  A value  of  one  (1)  causes  the  41  record  to  be  deleted, 
while  a value  of  two  (2)  causes  the  42  record  to  be  deleted. 

Division  Stock  (DA);  The  entry  of  this  transaction  causes  the 
Division  Stock  Status  (49)  record  to  be  updated.  If  this  record  does 
not  exist  for  the  division  number  coded  in  the  transaction,  a new  file 
record  is  created.  The  new  record  is  inserted  in  the  file  in  increasing 
order  by  division  number.  In  either  case,  the  transaction  values  for 
division,  date,  and  division  stock  level  replace  those  in  the  appropriate 
49  record. 

Division  Stock  Deletion  (DX);  Tne  submission  of  this  transaction 
will  cause  the  Division  Stock  Status  (49)  record  to  be  deleted  from  the 
file  for  the  division  number  coded  in  the  transaction. 

Average  Unit  Price  Change  (EA) ; This  transaction  enables  the  user  to 
make  a change  in  the  value  of  the  average  price  for  an  inventory  item. 

The  new  price  is  stored  in  the  Stock  Status  (53)  record  of  the  Inventory 
Master  File.  Also,  a value  adjustment  is  calculated  reflecting  the 
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change  in  value  of  the  on-hand  inventory  caused  by  the  price  change.  This 
value  change  (VC)  is  defined  as: 

VC  = (new  price  - old  price)  X (on-hand  quantity). 

The  quantity  VC  is  added  algebraically  (it  may  be  negative)  to  the  value 
adjustment  field  in  the  Monthly  Activity  (60)  record  of  the  file.  If  a 
60  record  does  not  exist  for  the  month  and  year  of  the  transaction,  a 

new  60  record  is  created.  The  value  adjustment  is  made  to  both  the  In- 
ventory Master  File  and  the  Inventory  Class  Master  File. 

Purchase  Order  (OA):  The  entry  of  this  transaction  will  cause  the 

Purchase  Order  Status  (55)  record,  and  the  Pi^rchase  Order  Accounting  (56) 
record,  if  one  exists,  to  be  updated.  If  these  records  do  not  exist, 
they  are  created  and  inserted  in  the  file  in  increasing  sequence  by  date. 
The  56  record  is  created  only  if  the  user  has  coded  accounting  data  in  the 
transaction.  This  information  is  in  columns  66—80  of  the  OA  transaction, 

'fhe  values  coded  in  the  transaction  replace  the  appropriate  values 
in  the  55  and  56  records.  One  exception  to  this  rule  is  the  following: 
if  the  transaction  is  updating  existing  file  records  and  a Purchase 
Order  quantity  is  coded,  this  quantity  is  added  to  the  Purchase  Order 
quantity  already  on  file.  It  should  be  noted  that  once  a 55  (or  56) 
record  is  on  file,  the  Purchase  Order  date  may  not  be  changed  by  an 
update  transaction. 

If  a Purchase  Order  quantity  is  coded  in  the  transaction,  the  Stock 
Status  (53)  record  is  updated.  The  quantity  is  added  to  the  on-order 
quantity  field  in  this  record.  In  addition,  the  reorder  notice  indi- 
cator and  date  are  set  to  zero. 
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HO  updating  is  done  to  the  Inventory  Class  Master  File  by  this 
transaction. 

Purchase  Order  (ON) ; The  entry  of  this  transaction  causes  updating 
of  the  Purchase  Order  Status  (55)  record  for  the- Purchase  Order  number 
coded  in  the  transaction.  The  order  quantity  in  the  transaction  is 
subtracted  from  the  order  quantity  in  the  55  record. 

In  addition,  the  order  quantity  is  subtracted  from  the  on-order 
quantity  in  the  Stock  Status  (53)  record. 

Purchase  Order  Delete  (OX):  The  entry  of  this  transaction  causes 

the  deletion  from  the  file  of  all  records  for  the  Purchase  Order  number 
coded  in  the  transaction.  These  records  include  the  Purchase  Order 
Status  (55)  record  and  the  Purchase  Order  Accounting  (56)  record,  if  one 
exists.  The  data  from  the  records  that  have  been  purged  are  displayed 
on  the  Purged  Items  and  Open  Purchase  Orders  report. 

Value  Adjustment  (9A,9N):  The  entry  of  a 9A  transaction  causes  the 
Monthly  Activity  (60)  record  to  be  updated.  If  a 60  record  does  not 
exist  for  the  transaction  month  and  year,  one  is  created  and  inserted  in 
the  file  in  ascending  sequence  by  date.  The  value  adjustment  value  in 
the  transaction  is  added  to  the  monthly  adjustments  field  in  the  60  record. 
This  updating  procedure  is  applied  to  both  the  Inventory  Master  File  and 
the  Inventory  Class  Master  File. 

Tne  entry  of  the  9N  transaction  initiates  the  same  action  as  the  9A 
with  the  following  exception:  the  value  adjustment  field  in  the  transaction 
is  subtracted  from  the  monthly  adjustment  field  in  the  60  record. 
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Reorder  Status  (RS) : This  transaction  is  generated  internally  by  the 


Inventory  system,  not  submitted  by  the  user.  It  is  created  by  the  Reorder 
Notification  program,  RPOll,  and  contains  a record  of  a reorder  notice 
that  has  been  issued  for  that  item  number.  The  transaction  contains  the 
notice  number  and  the  date  the  notice  was  issued.  These  values  are 
placed  in  the  corresponding  fields  in  the  Reorder  Status  (50)  record  of 
the  file. 

The  remainder  of  the  inventory  transactions  are  discussed  according 
to  their  impact  in  the  file,  rather  than  according  to  transaction  code. 
Those  transactions  that  cause  similar  updating  procedures  are  listed  to- 
gether. For  example,  the  6A  and  7N  transactions  cause  the  same  file  up- 
dates, although  submitted  for  different  reasons. 

Materials  Receipt  (6A)  and  Vendor  Return  (7N):  The  entry  of  these 

transactions  causes  the  Purchase  Order  Status  (55)  record  to  be  updated 
for  the  Purchase  Order  number  referenced  in  the  transaction.  The  receipt 
quantity  is  added  to  the  cumulative  receipts  field  in  the  appropriate 
55  record. 

These  transactions  also  cause  the  average  unit  price  for  the  item 
number  to  be  recalculated.  The  revised  price  is  placed  in  the  Stock 
Status  (53)  records.  Also,  the  receipt  quantity  is  added  to  the  on-hand 
quantity  field  and  subtracted  from  the  on-order  quantity  field  in  the  53 
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record.  The  calculation  of  the  new  average  price  is  as  follows: 


NEW  PRICE  = (OH  X OP)  + (RQ  x RP) 
(OH  + RQ) 


where 


OH=On-hand  quantity 

0P=01d  average  unit  price 

RQ=Receipt  quantity 

RP=Receipt  price.  This  price  is  defined  to  be:  (order  price  from 

55  record)  x (sales  tax  factor) . The  sales  tax  factor  is  taken 
from  the  Inventory  Constants  file  unless  an  item-specific  tax 
factor  exists  in  the  Header  (40)  record. 

Finally,  the  value  of  the  receipts  is  added  to  the  monthly  receipt 
value  field  of  the  Monthly  Activity  (60)  record.  The  value  is*  stored  in 
the  60  record,  the  date  of  which  is  the  same  as  the  transaction  date.  The 
value  of  receipts  is  defined  to  be:  (receipt  quantity)  x (the  receipt 

price) . This  value  is  added  to  both  the  Inventory  Master  File  and  the 
Inventory  Class  Master  File. 

Materials  Receipt  (6N)  and  Vendor  Return  (7A):  The  entry  of  these 

transaction  causes  the  Purchase  Order  Status  (55)  record  to  be  updated 
for  the  Purchase  Order  number  referenced  in  the  transaction.  The  receipt 
quantity  is  subtracted  from  the  cumulative  receipts  field  in  the  appropri- 
ate 55  record. 

These  transactions  also  cause  the  average  unit  price  for  the  item 
number  to  be  recalculated.  The  revised  price  is  placed  in  the  Stock 
Status  (53) 'record.  Also,  the  receipt  quantity  is  subtracted  from  the 
on-hand  quantity  field  and  added  to  the  on-order  quantity  field  in  the 
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53  record.  The  calculation  of  the  new  average  price  is  as  follows: 

i^EW  PRICE  = (OH  X OP)  - (RQ  x RP) 

(OH  - RQ) 

where 

0H=  On-hand  quantity 

0P=  Old  average  unit  price 

RQ=  Receipt  quantity 

Receipt  price.  This  price  is  defined  to  be:  (order  price  from 

55  record)  x (sales  tax  factor) . The  sales  tax  factor  is  taken 
from  the  Inventory  Constants  file  unless  an  item— specif ic  tax 
factor  exists  in  the  Header  (40)  record. 

Finally,  the  value  of  the  receipts  is  subtracted  from  monthly  receipt 
value  field  of  the  Monthly  Activity  (60)  record.  The  value  is  stored  in 
the  60  record,  the  date  of  which  is  the  same  as  the  transaction  date.  The 
value  of  receipts  is  defined  to  be:  (receipt  quantity)  x (the  receipt  price). 
This  value  is  subtracted  from  both  the  Inventory  Master  File  and  Inven- 
tory Class  Master  File. 

Materials  Issue  (8A)  and  Materials  Credit  (IN):  These  transactions 

cause  a reduction  in  the  on-hand  quantity  for  an  item  number.  The  issue 
quantity  contained  in  the  transaction  is  subtracted  from  the  on-hand 
quantity  in  the  Stock  Status  (53)  record.  For  the  8A  transaction  only, 
the  date  of  the  issue  and  the  quantity  issued  are  stored  in  the  Reorder 
Status  (50)  record. 

The  program  also  calculates  the  value  of  the  issue  quantity.  This 
value  is  defined  to  be:  (issue  quantity)  x (average  unit  price).  The 
issue  value  is  added  to  the  monthly  issue  value  field  in  the  appropriate 
Monthly  Activity  (60)  record  for  the  transaction  date.  This  update  is 
performed  against  the  Inventory  Master  File  and  the  Inventory  Class  Master 
File.  Finally,  the  issue  quantity  is  added  to  the  cumulative  issue 
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quantity  field  of  the  60  record  in  the  Inventory  Master  File. 


Materials  Issue  (8N)  and  Materials  Credit  (lA);  These  transactions 
cause  an  addition  to  the  on-hand  quantity  for  an  item  number.  The  issue 

quantity  from  the  transaction  is  added  to  the  on-hand  quantity  in  the 

Stock  Status  (53)  record. 

The  value  of  the  input  issue  quantity  is  calculated  as  follows: 

(issue  quantity)  x (average  unit  price).  This  value  is  then  subtracted 
from  the  cumulative  issue  value  field  of  the  Monthly  Activity  (60)  record 
for  the  transaction  date.  This  update  is  performed  against  both  the 
Inventory  Master  File  and  the  Inventory  Class  Master  File. 

Finally,  the  transaction  issue  quantity  is  subtracted  from  the  cu- 
mulative issue  quantity  field  of  the  60  record  in  the  Inventory  Master  File. 

Quantity  Adjustment  (2A,3N,4N);  The  entry  of  these  transactions  causes 
a positive  adjustment  to  the  on-hand  quantity  for  the  item  number.  The 

transaction  quantity  is  added  to  the  on-hand  quantity  field  in  the  Stock 

Status  (53)  record.  The  value  of  this  quantity  adjustment  is  calculated 
as  follows:  (adjustment  quantity)  x (average  unit  price).  This  value  is 

added  to  the  cumulative  adjustment  value  field  of  the  Monthly  Activity 
(60)  record  for  the  transaction  date.  This  addition  is  performed  on  both 
the  Inventory  Master  File  and  Inventory  Class  Master  File. 

Finally,  the  record  of  the  latest  reorder  notice  issued  is  zeroed 
out  in  the  Reorder  Status  (50)  record. 

Quantity  Adjustment  (2N,3A,4A);  The  entry  of  these  transactions  causes 
a negative  adjustment  to  the  on-hand  quantity  for  the  item  number.  The 
transaction  quantity  is  subtracted  from  the  on-hand  quantity  field  in  the 
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Stock  Status  (53)  record.  The  value  of  this  quantity  adjustment  is  calcu- 
lated as  follows;  (adjustment  quantity)  x (average  unit  price).  This  value 
is  subtracted  from  the  cumulative  adjustment  value  field  of  the  Monthly 
Activity  (60)  record  for  the  transaction  date.  This  subtraction  is  per- 
formed on  both  the  Inventory  Master  File  and  the  Inventory  Class  Master 
File. 

7. 3. 3. 3 The  Current  Transaction  File 

This  file  contains  a record  of  each  transaction  processed  during  the 
current  system  execution.  Each  record  is  127  characters  long,  and  consists 
of  the  99-character  transaction  record  input  to  the  program,  a 6-character 
prefix,  and  a 22-character  suffix.  The  prefix  is  the  date  on  which  pro- 
cessing occurred,  in  the  form  YYMMDD.  The  suffix  consists  of  the  on- 
order  quantity,  on-hand  quantity,  and  average  unit  price  of  the  item  number 
after  the  transaction  was  processed.  This  data  is  included  for  printing 
by  the  Materials  Transaction  History  Report  Generator  program,  RPOIOC. 

The  Current  Transaction  File  is  also  read  by  the  Transaction  History 
File  Update  program,  RPOOO,  which  copies  its  contents  to  the  Transaction 
History  File. 

For  certain  transactions,  the  Inventory  Master  File  Edit/Update 
program,  DG300,  places  additional  information  in  the  transaction  record. 

This  new  data  are  then  displayed  on  the  Materials  Transaction  History  re- 
port. The  transactions  so  affected,  and  the  data  added  are: 

(a)  Item  Deletion  (AX) 

(1)  Item  name 

(2)  Unit  of  issue 


7-44 


(b) 


Division  Stock  Delete  (DX) 


(1)  Division  stock  level 

(c)  Purchase  Order  Delete  (0X) 

(1)  Accounting  data  from  the  Purchase  Order  Accounting 
(56)  record  (if  any) 

(d)  Materials  Issue  and  Credit  (8A, 8N, lA, IN) . For  direct  charge 
and  free  stores  items,  accounting  data  are  included  from 
the  Purchase  Order  Accounting  (56)  record  for  the  specific 
Purchase  Order  number  against  which  the  issue,  or  credit, 
was  made. 

7. 3. 3. 4 Purchase  Order  Transaction  File 

This  file  contains  a record  of  each  Purchase  Order  (OA,ON)  trans- 
action processed  during  the  current  system  run.  The  file  contains  127 
character  records,  which  consist  of  the  99-character  input  transaction, 
a 6-character  prefix,  and  a 22-character  suffix.  The  prefix  is  the 
processing  date  of  the  transaction  in  the  form  YYMMDD.  The  suffix 
contains  the  item  identification  from  the  Header  (40)  record  of  the 
Inventory  Master  File  and  the  sales  tax  factor  for  that  item. 

The  sales  tax  may  either  be  from  the  Inventory  Constants  File,  or 
be  item-specific  and  from  the  40  record. 

The  transaction  also  contains  an  indicator  code  (in  position  28  of 
the  127-character  record)  that  denotes  the  file  status  as  of  the  pro- 
cessing of  the  transaction.  The  possible  values  of  this  code  are: 

(a)  Zero,  original  Purchase  Order  (OA) ; 

(b)  One,  Purchase  Order  amendment  (OA) , the  result  of  which  is 
that  the  order  quantity  does  not  equal  the  cumulative  re- 
ceipts for  the  Purchase  Order; 
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(c)  Nine,  Purchase  Order  amendment  (OA),  the  result  of  which  is 
that  the  order  quantity  equals  the  cumulative  receipts 
for  that  Purchase  Order.  This  code  is  also  placed  in  a 

ON  transaction  that  causes  this  condition  to  occur;  and 

(d)  Two,  Purchase  Order  amendment  (ON),  the  result  of  which  is 
that  the  order  quantity  does  not  equal  the  cumulative  re- 
ceipts for  that  Purchase  Order. 

The  Purchase  Order  Transaction  File  is  read  by  the  Receiving  Report 
Generator  program,  RP060. 

7. 3. 3. 5 Temporary  Suspense  File 

The  Temporary  Suspense  File  contains  a record  of  all  transactions 
that  were  not  processed  during  the  current  system  execution  due  to  vio- 
lation of  update  criteria  specified  for  the  Inventory  Master  File. 

These  criteria  are  described  in  Table  7.3-3. 

The  transactions  that  may  be  spooled  to  this  file  are:  8A,  1N,2N, 

3A,4A,6N,  and  7A.  A suspense  cycle  counter  is  included  in  each  trans- 
action passed  to  the  file.  This  is  a count  of  the  number  of  times  a 
transaction  has  been  spooled  to  the  file  without  being  processed.  The 
counter  and  the  contents  of  the  transaction  are  printed  on  the  Inventory 
Suspense  File  Contents  report. 

7. 3. 3. 6 Purging  Master  File  Records 

The  SIMS  Inventory  system  is  designed  to  retain  on  the  Inventory 
Master  File: 

(a)  Monthly  Activity  (60)  records  for  16  months;  and 

(b)  Purchase  Order  (55)  and  Purchase  Order  Accounting  (56)  records 
totaling  20  each. 
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The  Inventory  Master  File  Edit/Update  program  automatically  purges 
the  oldest  records  when  the  above  counts  have  been  reached.  When  a 
monthly  record  is  purged,  the  value  of  issues,  receipts,  and  adjustments 
is  included  in  the  beginning  on-hand  value  field  of  the  Stock  Status  (53) 
record.  Also,  the  date  from  the  60  record  replaces  the  date  in  the  53 
record.  Tliis  purge  action  occurs  for  the  Inventory  Class  Master  File  as 
well. 

When  a Purchase  Order  (55,  56)  record  is  purged,  a check  is  made  to 
see  whether  the  order  has  been  filled.  If  not,  the  purged  data  are  dis- 
played on  the  Purged  Items  and  Open  Purchase  Orders  report. 

As  a further  file  space-saving  device,  a date  purge  is  used  on  the 
file  records.  Purge  factors  are  as  follows: 

(a)  60  records  more  than  17  months  old  are  purged  provided  at 
least  two  records  would  remain  on  file;  and 

(b)  Closed  Purchase  Order  (55,  56)  records  are  purged  if  they 
are  more  than  Y months  old,  provided  at  least  two  records 
would  remain  on  file.  The  factor  Y is  user-specified  and 
is  available  from  the  Inventory  Constants  File. 

Finally,  an  automatic  purge  function  has  been  included  for  direct 
charge  (DC)  items.  A direct  charge  item  is  purged  provided:  cumulative 

receipts  equals  the  order  quantity  for  the  item,  and  the  date  of  last 
issue  is  more  than  Z months  old.  The  factor  Z is  user-specified  and  is 
available  from  the  Inventory  Constants  File.  Items  that  are  purged  in 
this  manner  are  displayed  on  the  Purged  Items  and  Open  Purchase  Orders 
report. 
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7.3.4  Error  Messages 


During  program  execution,  an  error  may  occur  that  results  in  system 
termination.  An  error  message  is  printed  and  an  intentional  abnormal 
termination  is  caused.  This  is  done  to  prevent  the  saving  of  output 
files  that  are  in  error.  The  possible  messages  printed  are  : 

(a)  DG300  - SEQUENCE  ERROR:  PART  MASTER  OUT  OF  SEQUENCE 

The  input  version  of  the  Inventory  Master  File  was  found 
to  be  out  of  proper  sort  sequence. 

(b)  DC300  - SEQUENCE  ERROR:  CLASS  MASTER  FILE  OUT  OF  SEQUENCE 

The  input  version  of  the  Inventory  Class  Master  File  was 
found  to  be  out  of  proper  sort  sequence. 

(c)  DG300  - SEQUENCE  ERROR:  TRANSACTION  FILE  OUT  OF  SEQUENCE 

The  input  Temporary  Storage  Transaction  File  was  found 
to  be  out  of  proper  sort  sequence. 
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7 . A RPOOO  - Transaction  History  File  Update 


The  Transaction  History  File  Update  program,  RPOOO,  is  executed  in 
the  job  step  immediately  after  the  updating  of  the  Inventory  Master  File. 
Its  function  is  to  transfer  the  current  valid  transactions  from  disk 
storage  to  tape  storage. 

7.A.1  System  Interfaces 

Figure  7.4-1  is  a program  flowchart.  As  illustrated,  program  input 
consists  of: 

(a)  Current  Transaction  File,  _CN1744.  INV.M.TRANDISK(+1) . This  data 
set  contains  the  transactions  processed  by  the  Inventory  Master 
File  Edit/Update  program,  DG300.  Each  transaction  record  has 
been  augmented  by  the  addition  of  the  processing  date  and  by 
elements  of  the  Stock  Status  record  just  updated;  and 

(b)  Transaction  History  File,  CN1744. INV.M. TRANTAPE (0) . This 
data  set  is  the  version  of  the  Transaction  History  File  up- 
dated during  the  last  system  run. 

Program  output  is  the  updated  version  of  the  Transaction  History 
File,  CN1744. INV.M. TRANTAPE(+1) . This  file  does  not  interface  with  any 
other  program  unless  the  user  has  requested  execution  of  RPOIOD,  the 
Requested  Materials  Transaction  History  Report  Generator  program. 

7.4.2  Program  Files 

No  internal  files  are  created  during  execution  of  the  program. 

7.4.3  Processing  Functions 

As  illustrated  in  Figure  7.4-1,  the  program  reads  the  last  version 
of  the  Transaction  History  File  and  the  Current  Transaction  File.  Records 
contained  in  the  old  version  of  the  Transaction  History  File  are  written 
to  the  new  version.  Records  contained  in  the  Current  Transaction  File 
with  the  exception  of  the  Reorder  Status  records  are  then  added  to  the 
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FIGURE  7.4-1 

RPOOO PROGRAM  FLOWCHART 
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Transaction  History  File. 

7.4.4  Error  Messages 

No  error  message  is  generated  by  the  program. 
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7. 5 RPOIOC  - Materials  Transaction  History  Report  Generator 


The  Materials  Transaction  History  Report  Generator  program  is  designed 
to  produce  a report  each  time  the  Inventory  Master  File  is  updated.  The 
report  produced  is  the  Materials  Transaction  History  Report.  This  report 
displays  the  contents  of  all  transactions  processed  during  the  updating 
procedure.  It  was  designed  to  assist  management  to  review  the  inventory 
transactions  successfully  processed.  Figure  7.5-1  describes  the  format 
of  the  Materials  Transaction  History  Report. 

7.5.1  System  Interfaces 

Figure  7.5-2  is  a program  flow  chart.  As  illustrated,  program  input 
consists  of  two  data  sets  available  from  prior  job  steps.  These  data 
sets  are: 

(a)  the  Inventory  Active  Master  File,  CN1744. INV.M. INVACTV, 
created  by  the  Inventory  Master  File  Edit/Update  program, 

DG300;  and 

(b)  the  Current  Transaction  File,  CN17744. INV.M.TRANDISK(+1) ; 
also  created  by  program  DG300. 

Program  output  consists  of  one  print  file  that  does  not  inter- 
face with  any  other  program. 

7.5.2  Program  Files 

Program  RPOIOC  produces  no  internal  files. 

7.5.3  Processing  Functions 

As  illustrated  in  Figure  7.5-2,  the  Current  Transaction  History 
File  is  read.  A check  is  made  against  the  current  item  number  being 
considered  from  the  Inventory  Active  Master  File.  If  the  item  number 
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FIGURE  7.5  1 

FORMAT  OF  MATERIALS  TRANSACTION  HISTORY  REPORT 
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FIGURE  7.5-2 

RP010C  PROGRAM  FLOWCHART 
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from  the  transaction  is  not  the  same,  the  Active  Master  is  scanned  until 
the  item  number  is  found.  If  the  transaction  is  the  first  processed 
against  that  item  number,  a print  line  is  generated  containing  the  item 
number  and  item  name. 

For  each  transaction  format,  the  program  prints  one  line  containing 
the  input  data  found  in  the  transaction.  Three  additional  data  items 
are  displayed:  the  on-order  quantity,  the  on-hand  quantity,  and  the 

average  unit  price.  These  values  are  contained  in  the  last  22-characters 
of  the  127-character  transaction.  If  the  transaction  has  caused  any  of 
these  values  to  change,  the  program  prints  the  ones  that  have  changed 
in  comparison  to  the  previous  transaction  printed  against  that  item 
number . 

Two  exceptions  to  the  above  transaction  print  procedures  are: 

(a)  for  the  Item  Deletion  (AX)  transaction,  one  line  is 
generated  indicating  that  the  item  has  been  purged 
from  the  Inventory  Master  File.  The  Active  Master 
File  contains  no  file  records  for  this  item  number; 
and 

(b)  for  the  Purchase  Order  (OA)  transaction,  a second 
print  line  is  generated  if  the  user  codes  accounting 
data  into  the  transaction. 

When  all  transactions  have  been  processed,  program  execution 
terminates . 
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7.5.4  Error  Messages 

If  the  Inventory  Active  Master  File  is  found  to  be  out  of  proper 
sort  sequence,  the  following  message  is  printed: 

'RPOIOC  - SEQUENCE  ERROR  ACTIVE  INVENTORY  PART  FILE'. 

A return  code  of  16  is  issued  that  causes  subsequent  job  steps 
to  be  bypassed. 

7.5.5  Remarks 

The  transactions  as  displayed  depict  the  order  in  which  the  trans- 
actions were  processed  by  the  Inventory  Master  File  Edit/Update  program, 
DG300. 
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7 . 6 RPOIOD  - Requested  Materials  Transaction  History  Report  Generator 

The  Requested  Materials  Transaction  History  Report  Generator  is 
designed  to  produce  an  on-demand  report.  The  program  is  usually  run  as 
a special  purpose  run,  not  on  a regular  basis. 

The  report  produced  is  the  Requested  Materials  Transaction  History 
Report  (see  Figure  7.6-1).  This  report  is  designed  to  enable  management 
to  display  the  various  inventory  transactions  that  have  been  processed 
against  selected  item  numbers.  The  transaction  data  are  printed  in  a 
format  that  facilitates  analysis.  The  transactions  are  displayed  in  the 
order  in  which  they  were  processed  by  the  Inventory  system.  This  will 
assist  management  in  understanding  how  the  current  status  of  the  selected 
item  numbers  came  to  be,  and  in  identifying  possible  errors. 

7.6.1  System  Interfaces 

Figure  7.6-2  is  a program  flowchart.  As  illustrated,  program  input 
consists  of  three  data  sets.  These  data  sets  are: 

(a)  the  Inventory  Master  File,  CN1744 . INV.M. INVENT.  This 
file  is  maintained  by  the  Inventory  Master  File  Edit/ 

Update  program,  DG300.  It  is  a generation  data  set, 
and  the  version  read  is  the  most  current  version; 

(b)  the  Transaction  History  File,  CN1744 . INV.M. TRANTAPE . 

This  file  is  maintained  by  the  Transaction  History 
File  Update  program,  RPOOO.  It  is  a generation  data 
set,  and  the  version  read  is  the  most  current  version; 
and 

(c)  the  Part  History  Select  Card  File,  SYSIN.  This  is  a 
card  file  containing  records  of  item  numbers  selected 
for  printing. 
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FIGURE  7.6  1 

FORMAT  OF  REQUESTED  MATERIALS  TRANSACTION  HISTORY  REPORT 


FIGURE  7.6-2 

RP010D  PROGRAM  FLOWCHART 
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Program  output  consists  of  one  print  file  that  does  not  interface 
with  any  other  program. 

1.6.2  Program  Files 

Program  RPOIOD  creates  one  internal  file  during  execution.  This 
file,  the  Transaction  Extract  File,  contains  transaction  records  for 
the  user-selected  item  numbers  extracted  from  the  Transaction  History 
File.  File  and  record  specifications  are  given  in  Table  7.6-1. 

7.6.3  Processing  Functions 

As  illustrated  in  Figure  7.6-2,  the  Part  History  Select  Card  File 
is  read.  This  is  a set  of  records  read  through  the  job  stream  on  punched 
cards  that  specify  those  item  numbers  for  which  transaction  data  is  to 
be  printed.  Each  record  contains  an  item  number,  and  an  optional  date 
range.  The  date  range  option  may  be  used  in  one  of  three  ways.  These  are 

(a)  if  neither  the  low  nor  high  date  is  coded,  the  program 
prints  all  transactions  on  file  ror  the  item; 

(b)  if  only  the  low  date  is  given,  the  program  prints 
all  transactions  the  dates  of  which  are  greater 
than  or  equal  to  the  coded  date;  and 

(c)  if  only  the  high  date  is  coded,  all  transactions 
with  a date  before  the  date  are  printed. 

Program  RPOIOD  performs  edit  checks  on  the  input  cards.  These  checks 

are : 

(a)  low  date  must  be  numeric  or  spaces;  and 

(b)  high  date  must  be  numeric  or  spaces. 

If  the  edit  criteria  are  met,  the  item  number  and  the  dates  are 
saved  in  program  working  storage.  If  a card  is  in  error,  it  is 
displayed  on  the  Part  Select  Card  Edit  Errors  report  with  an  asterisk 
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TABLE  7.6-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME;  Transaction  Extract  File 


DATA  SET  NAME:  &&TEMP 

NUMBER  OF  RECORD  FORMATS:  26 

RECORD  SIZE:  127  Characters 

FILE  ORGANIZATION:  Sequenced  by: 

Processing  Date 
Item  Number 

Transaction  Date 
Transaction  Code 

RECORD  FORMATS 

RECORD  NAME 

MAX.  NO.  MIN.  NO. 

Transaction  Record 

U 0 

Note:  The  Record  Formats  and  Specifications  are  the  same  as  for 

the  Transaction  History  File,  M.TRANTAPE  (see  Section  6.7). 
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xmder  each  field  in  error.  The  program  can  handle  up  to  20  valid 
select  cards.  If  more  than  20  valid  cards  are  found,  the  extra  cards 
are  rejected  and  displayed  on  the  edit  list. 

When  all  select  cards  have  been  read,  the  Inventory  Master  File 
is  read.  For  each  selected  item,  the  Item  Header  (40)  record  is  read 
and  the  item  name  for  the  part  is  moved  to  program  working  storage. 

If  a selected  item  is  not  on  file,  an  error  switch  is  set  for  use  by 
the  print  section  of  the  program. 

Next,  the  Transaction  History  File  is  read.  Each  transaction  is 
analyzed  to  determine  if  it  applies  to  one  of  the  requested  items  and 
is  within  the  requested  date  range.  Transactions  that  meet  these 

criteria  are  spooled  to  the  Transaction  Extract  File  for  printing. 

When  the  entire  file  has  been  read,  control  passes  to  the  print  section. 

For  each  selected  item,  the  Transaction  Extract  File  is  read 
and  all  associated  transactions  printed.  The  item  numbers  are  dis- 
played in  increasing  sequence  by  item  number.  Within  each  item,  trans- 
actions are  displayed  in  order  of  processing  by  the  system.  If  no 
transactions  are  found  for  the  report  period,  an  appropriate  message 
is  printed  for  the  affected  item.  If  an  item  was  requested  that  was 
not  found  on  the  Inventory  Master  File,  an  indicative  message  is  printed. 

When  all  requested  items  have  been  processed,  program  execution 
terminates . 
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7.6.4  Error  Messages 

If  the  Inventory  Master  File  was  found  to  be  out  of  proper  sort 
sequence,  the  following  message  is  printed: 

’RPOIOD  - SEQUENCE  ERROR  INVENTORY  PART  MASTER  FILE' 

A return  code  of  16  is  issued  that  causes  subsequent  job  steps  to  be  by- 
passed. 
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7 . 7 RPOll  - Reorder  Notification  Report  Generator 


The  Reorder  Notification  Report  Generator  program  is  designed  to 
generate  two  reports: 

(a)  Reorder  Notification  (see  Figure  7.7-1);  and 

(b)  Followup  Reorder  Notification,  which  is  similar 
in  format  (see  Figure  7.7-2). 

These  reports  assist  management  to  reduce  the  probability  that  an 
out-of-stock  condition  will  occur.  As  a prerequisite  to  the  use  of  this 
program,  the  user  defines  a reorder  point  for  each  item  under  inventory. 
Then,  whenever  transactions  are  processed,  this  program  is  also  executed. 

A test  value,  the  sum  of  the  quantity  on-hand  and  the  quantity  on-order, 
is  computed  and  compared  to  the  reorder  point.  If  this  sum  is  less  than 
or  equal  to  the  reorder  point,  a reorder  notice  (No.  1)  is  generated  and 
information  pertaining  to  the  item  is  displayed  on  the  report. 

The  above  comparison  is  made  each  time  the  program  is  executed, 
and  a reorder  notice  is  generated  until  the  test  value  exceeds  the  reorder 

point.  The  printing  of  the  follow-up  reorder  notice  is  suppressed  until 
a period  of  time,  the  reorder  notice  interval,  has  elapsed.  This  time 
period  is  allowed  for  the  administrative  and  clerical  time  to  evaluate 
the  Reorder  Notification,  write  the  Purchase  Order,  and  prepare  and  submit 
the  Purchase  Order  transaction  to  the  computer  system.  The  Reorder 
notice  interval  is  a user-specified  system  constant.  Follow-up  reorder 
notices  will  continue  to  be  displayed  at  similar  intervals  of  time  until 
the  purchasing  action  has  been  completed.  The  first  follow-up  reorder 
notice  is  identified  as  No.  2,  the  next  one  as  No.  3,  and  so  on. 
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QUANTITY  AVERAGE  ISSUES  ISSUES  FOR  QUARTER  ENDED  LAST 
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FIGURE  7.7  1 

FORMAT  OF  REORDER  NOTIFICATION  REPORT 
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FIGURE  7.7-2 

FORMAT  OF  FOLLOWUP  REORDER  NOTIFICATION  REPORT 


During  program  execution,  the  contents  of  the  Temporary  Suspense 
File  are  copied  to  the  Suspense  File,  along  with  Reorder  Status  (RS) 
transactions  generated  by  the  program. 

7.7.1  System  Interfaces 

Figure  7.7-3  is  a program  flowchart.  As  illustrated,  program  in- 
put consists  of  four  data  sets  available  from  prior  job  steps.  These 
data  sets  are: 

(a)  the  Report  Date  File,  CN1744. INV. S . INVDATE,  created 
through  execution  of  the  utility  program  lEBGENER; 

(b)  the  Inventory  Active  Master  File,  CN1744. INV.M. INVACTV, 
created  through  execution  of  the  Inventory  Master  File 
Edit/Update  program,  DG300; 

(c)  the  Temporary  Suspense  File,  CN1744 . INV.M. INVSUSPN,  also 
created  through  execution  of  program  DG300;  and 

(d)  the  Inventory  Constants  File,  CN1744. INV. S. CONST,  main- 
tained by  the  Data  Acceptance  program,  DA300. 

Program  output  consists  of  print  files  that  do  not  interface  with 
any  other  program  and  of  the  Suspense  File,  CN1744 . INV. SUSPFILE,  which 
is  a generation  data  set. 

7.7.2  Program  Files 

No  internal  file  is  created  by  this  program. 

7.7.3  Processing  Functions 

The  Reorder  Notification  Report  Generator  program  includes  the 
additional  functions  of  reading  the  Temporary  Suspense  File  and  writing 
its  contents  to  the  Suspense  File.  These  functions  are  performed  first. 

As  illustrated  in  Figure  7.7-3,  the  date  and  constants  files  are  read. 
The  date  file  provides  the  report  date  request,  and  the  reorder  notice 
interval  is  obtained  from  the  constants  file. 
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FIGURE  7.7-3 

RP011  PROGRAM  FLOWCHART 
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The  lavc-ntory  i\cl  ive  Master  File  contains  the  Inventory  Master 
File  records  for  each  item  for  which  at  least  one  transaction  has  been 
processed  during  the  current  system  run.  Each  set  of  records  is  checked 
in  turn. 

Using  the  Stock  Status  (53)  record,  a test  value  is  computed.  This 
value  is  the  sum  of  the  on-hand  quantity  and  the  on-order  quantity.  The 
test  value  is  then  compared  to  the  reorder  point.  If  the  test  value  is 
equal  to  or  less  than  the  reorder  point,  the  item  is  a reorder  notice 
candidate.  Items  with  a reorder  point  of  AR  or  DNR  are  not  considered. 

The  Reorder  Status  (50)  Record  is  checked  to  determine  if  there  is  an  out- 
standing reorder  notice  for  the  item.  If  such  a notice  has  not  been 
issued,  a Reorder  Status  (RS)  transaction  is  generated  and  sent  to  the 
Suspense  File.  The  RS  transaction  contains  the  notice  number  and  a date 
equal  to  the  report  date.  If  a notice  is  on  file,  a check  is  made  to 
determine  the  date  of  the  last  notice.  If  the  date  is  older  than  Y days 
back  from  the  report  date,  an  RS  transaction  with  an  incremented  notice 
number  is  generated.  The  value  Y is  the  reorder  notice  interval.  Finally, 
the  average  unit  price,  on-hand  quantity,  and  on-order  quantity  are 
saved  for  printing  on  the  report. 

Next,  the  Purchase  Order  Status  (55)  records  for  the  item  are, read. 

The  number  of  the  most  recent  Purchase  Order  is  saved  for  printing. 

Finally,  the  Monthly  Activity  (60)  records  for  the  item  are  examined. 
The  Reorder  Notification  Reports  contain  summary  data  of  the  quantity  of 
the  item  issued  during  the  current  quarter  and  during  the  last  four  calendar 
quarters.  The  monthly  issue  quantities  are  aggregated  to  obtain  quarterly 
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data  that  are  saved  for  printing. 

When  all  Monthly  Activity  records  have  been  processed,  a print 
line  is  generated  for  the  item.  If  the  reorder  notice  is  an  original, 
the  entry  is  made  on  the  Reorder  Notification  Report.  If  the  notice 
is  a follow-up  reorder  notice,  the  entry  is  made  on  the  Followup  Re- 
order Notification  Report. 

When  all  items  contained  on  the  Inventory  Active  Master  File  have 
been  processed,  program  execution  terminates. 

7.7.4  Error  Messages 

If  an  error  occurs,  an  indicative  error  message  is  printed,  and 
program  execution  is  terminated.  The  messages  are: 

(a)  RPOll-OlOO  ACTIVE  INVENTORY  FILE  OUT  OF  SEQUENCE 

The  Inventory  Active  Master  File  was  found  to  be  out 
of  proper  sort  sequence.  A return  code  of  16  is  issued 
cancelling  execution  of  subsequent  job  steps. 

(b)  RP011-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  DATE- 
RECORD 

The  date  request  record  for  the  report  was  found  to 
have  a non-numeric  date. 

(c)  RP01I-0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

A date  request  record  for  the  report  was  not  found 
in  the  Report  Date  File. 
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7 . 8 RP013  - Unfilled  Purchase  Orders  Report  Generator 


The  Unfilled  Purchase  Orders  Report  Generator  program,  RP013,  is  de- 
signed to  produce  an  on-demand  report.  The  program  is  normally  executed 
on  a monthly  basis. 

The  report  produced  is  the  Unfilled  Purchase  Orders  Report.  Figure 
7.8-1  is  a format  of  this  report.  The  report  is  designed  to  display,  for 
each  item  on  the  Inventory  Master  File,  all  Purchase  Orders  that  have  been 
unfilled  for  more  than  a user-specified  number  of  days.  The  data  displayed 
includes  the  Purchase  Order  number,  the  vendor  to  which  the  order  was 
issued,  and  the  quantity  on  back  order. 

This  report  is  designed  to  assist  management  in  analyzing  the  perfor- 
mance of  vendors  in  the  filling  of  orders. 

7.8-1  System  Interfaces 

Figure  7.8-2  is  a program  flowchart.  As  illustrated,  program  input 
consists  of  three  data  sets,  available  from  prior  job  steps.  These  data 
sets  are: 

(a)  the  Report  Date  File,  CN1744. INV. S . DATE,  created  through  the 
execution  of  the  utility  program  lEBGENER; 

(b)  Inventory  Constants  file,  CN1744. INV. S . CONST,  maintained  by 
the  Data  Acceptance  Program,  DA300;  and 

(c)  Inventory  Master  File,  CN1744. INV.M. INVENT(  ),  updated  by  the 
Inventory  Master  File  Edit/Update  program,  DG300. 

Program  output  consists  of  print  files  that  do  not  interface  with 
any  other  program. 

7.8.2  Program  Files 

During  execution,  the  program  creates  one  internal  file,  the  Unfilled 


7-71 


llllllllllllllllllllllUllllUlU 

000000000011111111112222222222333 


^ O'  O'  ^ 

O 9'  O'  ^ 

O'  O'  ^ O' 

O O'  O O'  O' 

O O ^ O'  O' 

O ^ O O'  o 


0 0^00 
O'  O ^ O'  O' 
0 0^00 
O'  O ^ o o 

O O O'  O O' 

O O O'  O O' 


ec  oc  oc  ac  OL 

>>>>•> 
I I I I I 
< < < < < 
o o o o o 


PC  K « ac  s; 
>•>>•>•> 
t I < I I 
< < < < < 
o o o o o 

o o ^ 

Z Z Z X X 


O O' 

o ® 
o 

o <o 

O 

o 4- 

O-  f*\ 

O <N 

o ^ 
o o 

CD  O 

to  <0 
® 

® <0 
® l/\ 
® ^ 


h* 

O 

o o 

O CD 
O f- 
<0  'O 
<o  t/> 
>0  '#• 
<o  fn 
<o 

'C  o 

lih  9 
u>  o 

k/>  <« 
>A  U^ 
l/N 

m fn 

m 

«n 

\f\  o 

O' 

-r  to 

O 

4*  ^ 
iT\ 
O 'T 
o tty 
4*  rg 
4-  -H 

>f  o 

m 

® 
n r- 


m 

m ft'' 

m rg 


rg  -O 
<N 

<M  4- 
rg 

rg  pg 
pg 

pg  o 

^ o 
® 


® « 
UJ  UJ  > 

Z O 'N 
<cc< 
z a o 

t X. 
H>  u;  O 
M (/>  Z 

Z Z ik 

< Vi)  O 

« (X 
^ 3 »/» 

L a.  ^ 


OL  cc  ac  cc  oL 

>•>>>> 
I I I I I 

< < < < < 

0 o o o o 

1 I I I I 

o o o o o 

Z Z Z X z 


» » I J I 

^ ^ ^ O' 

^ ^ ^ ^ ^ 

• • • • • 

^ ^ ^ O'  ^ 


at  CL  DC  oc  ec 

>>->>> 
I I I I I 

< < < < < 

0 o o o o 

1 I I I I 

o o o o o 

Z Z Z X X 


I I I ( I 

O O O O O' 

o O o o o 

• • • t • 

^ ^ ^ O' 

►g  PSI  »ig  tsj 

K)  ^g  N4  pg 


pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 

1 1 1 1 1 

<r  0*  ^ ^ ^ 

^ ^ ^ ^ 

1 1 1 » 1 

^ ^ ^ ^ 
^ ^ ^ 0*  CP 

CP  ^ 0^ 

o o o o d 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 

X X K X X 
X X X K X 
X X X X X 
X X X K H 
X K X X X 
X X X X K 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 


X X X X X 

X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X X X 
X X X A X 
) I I I t 

X X X M.  X 
I I I I I 
X X X X X 
X X X X X 


O'  O'  O O'  o 

O'  o o o o 

O O O'  o o 

o O'  O O'  o 

O O O O O' 


X X 
X >( 
X X 
X X 
X X 
X X 
X X 
X X 
X X 
X X 
X X 
X X 
X X 
X X 
X X 


XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 

XXX 


X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X 


I I 


X X 


I 

> X X 


O O'  O O'  o 

O O O O O' 

o o o o o 

O O'  O O O' 


7-72 


FIGURE  7.8  1 

FORMAT  OF  UNFILLED  PURCHASE  ORDERS  REPORT 


ENTER 


UNFILLED 
PURCHASE 
ORDERS 
REPORT 


FIGURE  7.8-2 

RP013  PROGRAM  FLOWCHART 


Purchase  Order  File.  This  file  is  described  in  file  and  record  specifi- 
cations in  Tables  7.8-1  and  7.8-2. 

7.8.3  Processing  Functions 

As  illustrated  in  Figure  7.8-2,  the  Inventory  Constants  File  is  read. 

The  unfilled  order  interval  is  found  and  moved  to  program  working  storage. 

The  Report  Date  File  is  then  read,  and  the  request  record  for  the  program 
found.  This  date  is  also  saved  in  program  working  storage. 

For  each  Purchase  Order  Status  (55)  record  on  the  Inventory  Master 
File,  a check  is  made  to  determine  the  record  date.  If  the  date  is  more 
than  the  unfilled  order  interval  days  back  from  the  report  date,  the  Pur- 
chase Order  is  a report  candidate.  Next,  a check  is  made  to  determine 
the  order  status,  either  filled  or  unfilled,  If  the  order  is  filledi  the 
Purchase  Order  record  is  skipped.  If  the  order  is  unfilled,  an  extract 
record  is  created  and  released  to  the  COBOL  Internal  sort  routine.  Each 
extract  record  consists  of: 

(a)  item  number  and  name; 

(b)  the  vendor  code; 

(c)  the  Purchase  Order  number; 

(d)  the  quantity  ordered  and  the  back  order  quantity;  and 

(e)  the  Purchase  Order  date  and  expected  delivery  date. 

When  all  records  from  the  Inventory  Master  File  have  been  read,  * 

the  extracted  report  records  are  sorted  on  item  number,  The  sorted  file 
is  then  read,  and  the  Unfilled  Purchase  Orders  Report  generated.  One 

line  entry  is  produced  per  extract  record. 

When  all  extract  records  have  been  printed,  program  execution  terminates, 
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TABLE  7.8-1 


PROGRAM  FILE  SPECIFICATION 

FILE  NAME;  Unfilled  Purchase  Order  File 
DATA  SET  NAME;  &REPORT 

NUMBER  OF  FORMATS:  1 RECORD  SIZE;  65 

FILE  ORGANIZATION;  Sequenced  by:  Item  Number 

RECORD  FORMATS; 

RECORD  NAME  MAX.  NO. 

Unfilled  Purchase  Order  Record  U 


Characters 

MIN.  NO. 

0 


7-75 


TABLE  7.8-2 


RECORD  SPECIFICATION 

FIELD  NAME;  Unfilled  Purchase  Order  Record 
FILE  NAME;  Unfilled  Purchase  Order  File 
COBOL  NAME  OF  RECORD;  REPORT-RECORD 
RECORD  LENGTH:  65  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

11 

X(ll) 

R-PART-NBR 

Part  Number 

12 

5 

9(5) 

R-VNDR-ID 

Vendor  Number 

17 

15 

X(15) 

R- ITEM-NAME 

Item  Name 

32 

2 

XX 

R-UNIT-MSRE 

Unit  of  Issue 

34 

6 

9(4)V99 

R-OO-QTY 

Order  Quantity 

40 

6 

9(4)V99 

R-BO-QTY 

Back  Order  Quantity 

46 

6 

9(6) 

R-O-DTE 

Purchase  Order  Date 

52 

6 

X(6) 

R-EXP-DTE 

Expected  Delivery  Date 

58 

6 

9(6) 

R-PO-NBR 

Purchase  Order  Number 

64 

1 

X 

PARNl 

Not  Used 

65 

1 

X 

PARN2 

Not  Used 

TOTAL 

65 
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and 


7.8.4  Error  Messages 

If  an  error  occurs,  an  indicative  error  message  is  printed, 
program  execution  terminates.  The  messages  are: 

(a)  RPOl 3-0100  ACTIVE  INVENTORY  STATUS  FILE  OUT  OF  SEQUENCE 

This  message  is  printed  if  the  Inventory  Master  File  is  found 
to  be  out  of  proper  sort  sequence.  A return  code  of  8 is  is- 
sued causing  subsequent  job  steps  to  be  bypassed. 

(b)  RP013-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  the  date  request  record  for  the 
program  contains  a non-numeric  date. 

(c)  RP013-0300  lOTALID  DATA  FIELD  OR  RECORD  FOUND  IN  CONSTANT-FILE 

This  message  is  printed  if  the  unfilled  order  interval  from  the 
Inventory  Constants  file  is  not  nvimeric.  Program  execution  is 
not  terminated  when  this  is  detected.  A default  value  of  30 
days  is  used  for  the  unfilled  Purchase  Order  interval. 

(d)  RP013-0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  the  program  was  executed  without  a 
valid  date  card. 
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7.9  RP014  - Vendor  Performance  Report  Generator 


The  Vendor  Performance  Report  Generator  program,  RP014,  is  designed 
to  produce  an  on-demand  report.  The  program  is  normally  executed  on  a 
monthly  basis. 

The  report  produced  is  the  Vendor  Performance  Report  (see  Figure 
7.9-1).  This  report  gives  a summary  of  Purchase  Order  activity  for  each 
vendor  on  file.  The  activity  includes  orders  written  over  the  past  year 
and  for  the  report  month.  Also,  the  value  of  unfilled  purchase  orders 
is  displayed  according  to  the  length  of  time  unfilled.  This  report  is 
designed  to  assist  management  in  analyzing  the  level  of  activity  with 
each  vendor,  and  the  vendors'  response  performance. 

7.9.1  System  Interfaces 

Figure  7.9-2  is  a program  flowchart.  As  illustrated,  program  input 
consists  of  three  data  sets  available  from  prior  job  steps.  These  are: 

(a)  the  Report  Date  File,  CN1744. INV. S.DATE,  created  through 
execution  of  IBM  utility  program  lEBGENER; 

(b)  the  Vendor  Reference  File,  CN1744. INV. M. VENDOR,  maintained 
by  the  Data  Acceptance  program,  DA300;  and 

(c)  the  Inventory  Master  File,  CN1744. INV. M. INVENT ( ),  main- 
tained by  the  Inventory  Master  File  Edit /Update  program, 

DG300. 

Program  output  consists  of  one  priat  file  that  does  not  interface 
with  any  other  program. 

7.9.2  Program  Files 

During  execution,  one  internal  file  is  created.  This  is  the  Vendor 
Report  File,  &REPORT.  File  and  record  specifications  are  given  in 
Tables  7.9-1  and  7.9-2. 
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FIGURE  7.9  2 

RP014  PROGRAM  FLOWCHART 
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TABLE  7.9-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME:  Vendor  Report  File 

DATA  SET  NAME;  &REPORT 

NUMBER  OF  RECORD  FORMATS;  1 RECORD  SIZE 

FILE  ORGANIZATION;  Sequenced  by:  Vendor  Number 

Purchase  Order 


RECORD  FORMATS: 

RECORD  NAME  • MAX.  NO. 

Vendor  Record  U 


54  Characters 
Numbet 

MIN.  NO. 

0 
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TABLE  7.9-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Vendor  Record 

FILE  NAME:  Vendor  Report  File 

COBOL  NAME  OF  RECORD:  REPORT-RECORD 


RECORD 

FORMAT  CODE: 

None 

RECORD 

LENGTH:  54 

Characters 

FIELD 

FIELD 

* 

POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

5 

X(5) 

R-VNDR 

Vendor  Number 

6 

6 

X(6) 

R-PO-NBR 

Purchase  Order  Number 

12 

8 

9(6)V99 

R-VAL-MTD 

Value  of  Purchase  Order 

if  for  Report  Month 

20 

8 

9(6)V99 

R-VAL-31 

Total  Value  Unfilled  Purchase 

Orders 

28 

8 

9(6)V99 

R-VAL12 

Total  Purchase  Order  Value 

for  Last  12  Months 

36 

8 

9(6)V99 

R-VAL31-60 

Unfilled  Purchase  Orders 

between  30  and  60  days 
old 

44 

8 

9(6)V99 

R-VAL-60 

Unfilled  Purchase  Orders 

more  than  60  days  old 

52 

3 

X(3) 

FILLER 

TOTAL 

54 
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7.9.3  Processing  Functions 


As  illustrated  in  Figure  1.9-1,  the  Report  Date  File  is  read.  The 
report  request  record  for  the  report  is  found  and  the  date  stored  in 
program  working  storage.  Based  on  this  date,  three  reference  dates  are 
calculated.  These  dates  are  in  the  form  year  and  month  and  represent 
dates  one  month  old,  two  months  old,  and  one  year  old.  These  dates  are 
used  to  classify  the  Purchase  Order  data. 

The  Inventory  Master  file  is  read,  and  Purchase  Order  Status  (55) 
records  are  interrogated.  For  each  such  record,  a series  of  computations 
are  made  and  an  extract  record  generated.  Based  on  the  Purchase  Order 
date,  a determination  is  made  as  to  how  the  Purchase  Order  is  classified. 
The  possible  options  are: 

(a)  If  the  Purchase  Order  date  is  greater  than  the  report 
month,  the  record  is  ignored; 

(b)  If  the  PO  date  is  the  same  as  the  report  month,  the 
value  of  the  Purchase  Order  is  computed  and  stored  in 
the  extract  record.  The  value  is  placed  in  the  report 
month  field  and  the  last  12  months  field; 

(c)  If  the  PO  date  is  within  the  last  12  months,  the  value 
is  placed  in  the  last  12  months  field  of  the  extract 
record; 

(d)  If  the  PO  date  is  more  than  12  months  old  and  the  order 
is  filled,  the  record  is  ignored;  and 

(e)  If  the  Purchase  Order  is  unfilled,  the  value  of  the  un- 
filled portion  is  computed  and  stored  in  the  extract 
record.  Depending  on  the  record  date,  the  value  is 
either  classified  as  unfilled  for  30  to  60  days,  or 
for  more  than  60  days. 

When  the  Purchase  Order  record  has  been  processed,  the  extract  record 

is  released  to  the  COBOL  internal  sort  routine.  The  records  are  sorted 

by  vendor  code  and  Purchase  Order  number.  This  is  the  sequence  required 
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by  the  report  generation  phase.  When  all  Purchase  Order  records  have 
been  processed,  control  branches  to  the  report  generation  section. 

The  sorted  extract  file  is  read.  The  record  values  are  aggregated 
according  to  vendor  code.  Also,  a count  is  made  of  the  orders  written 
for  the  report  month,  and  for  the  last  12  months.  These  counts  are  dis- 
played on  the  report.  When  the  records  have  been  summed  for  the  current 
vendor,  the  Vendor  Reference  File  is  read  to  get  the  associated  vendor 
name.  If  a name  is  not  found,  spaces  are  substituted.  The  program 
generates  a report  entry  for  this  vendor  displaying  the  aggregated  data. 

When  all  extract  records  have  been  processed,  a summary  line  is 
printed  that  represents  an  aggregation  of  all  the  individual  line  entries. 
When  this  summary  has  been  generated,  program  execution  terminates. 

7.9.4  Error  Messages 

If  an  error  occurs  during  execution  an  indicative  error  message  is 
printed  and  execution  terminates.  The  messages  are: 

(a)  RP014-0100  ACTIVE  INVENTORY  STATUS  FILE  OUT  OF  SEQUENCE 

The  Inventory  Master  File  was  found  to  be  out  of  proper 
sort  sequence.  A return  code  of  8 is  issued  that  cancels 
execution  of  subsequent  job  steps. 

(b)  RP014-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  DATE-RECORD 

The  report  request  record  from  the  Report  Date  File  was 
found  to  have  a non-numeric  date. 

(c)  RP014-0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

A report  request  record  for  the  program  was  not  found 
in  the  Report  Date  File. 
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7. 10  RP016  - Division  Stock  Replacement  Report  Generator 


The  Division  Stock  Replacement  Report  Generator  program  (RP016)  is 
designed  to  produce  a standard  report.  The  program  is  usually  executed 
on  a weekly  basis,  as  a part  of  the  regular  inventory  system  run. 

The  report  produced  is  the  Division  Stock  Replacement  Report  (see 
Figure  7.10-1).  This  report  was  designed  to  suit  the  output  requirements 
of  AC  Transit  District.  At  ACTD,  issues  may  be  made  from  the  main  store- 
room or  from  one  of  two  ancillary  storerooms.  The  main  storeroom  is 

specified  as  division  02;  the  ancillary  storerooms  are  specified  as 

divisions  03  and  04.  All  other  issues,  not  identified  by  division,  are 

considered  to  be  from  a hypothetical  division  zero.  The  program  generates 
one  report  for  each  of  these  four  storerooms.  These  reports  display  the 
quantity  of  each  item  issued  during  the  current  system  run. 

For  each  item  issued,  one  print  line  is  generated.  The  line  is  gen- 
erated on  the  report  for  the  division  from  which  the  issue  was  made. 

The  line  contains  the  item  number  and  name,  the  unit  of  issue,  the 

total  quantity  issued,  and  the  nominal  stock  level.  To  facilitate 
report  analysis,  an  asterisk  is  printed  next  to  an  item  for  which 
the  quantity  issued  was  greater  than  the  nominal  stock  level. 

This  report  is  used  by  the  central  storeroom  as  a refill  order  to 

replenish  division  stock  to  the  desired  nominal  level. 

7.10.1  System  Interfaces 

Figure  7.10-2  is  a program  flowchart.  The  program  reads  two  files 
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FIGURE  7.10  1 

FORMAT  OF  DIVISION  STOCK  REPLACEMENT  REPORT 


FIGURE  7.10-2 

RP016  PROGRAM  FLOWCHART 
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created  in  previous  job  steps.  These  are: 

(a)  the  Inventory  Active  Master  File,  CN1744. INV.M. INVACTV,  created 
by  the  Inventory  Master  File  Edit/Update  program,  DG300;  and 

(b)  the  Current  Transaction  File,  CN1744. INV.M. TRANDISK(  ),  created 
by  the  Inventory  Master  File  Edit/Update  program,  DG300. 

Program  output  consists  of  four  print  files  that  do  not  interface 
with  any  other  programs. 

7.10.2  Program  Files 

RP016  creates  no  internal  files. 

7.10.3  Processing  Functions 

As  illustrated  in  Figure  7.10-2,  the  Current  Transaction  File  is 
read.  Only  issue  type  transactions,  codes  8A,  8N,  LA,  and  IN,  are  con- 
sidered by  the  program. 

When  an  issue  transaction  is  read,  a determination  is  made  of  the 
division  from  which  the  issue  was  made.  The  division  number  is  coded  in 
the  transaction.  If  the  division  is  not  two,  three,  or  four,  the  divi- 
sion is  assumed  to  be  zero.  The  program  aggregates,  by  division,  the 
issue  transaction  data  for  each  item  number.  Transaction  codes  8A  and 
IN  are  treated  as  positive  issues,  and  8N  and  lA,  as  negative  issues. 

When  all  issue  transactions  have  been  aggregated  for  the  item,  the  pro- 
gram reads  the  Inventory  Active  Master  File. 

The  Inventory  Active  Master  File  contains  all  records  from  the  In- 
ventory Master  File  for  those  items  against  which  transactions  were  pro- 
cessed. The  file  is  read  to  find  the  records  for  the  item  number  under 
consideration.  The  data  items  saved  are  the  item  name  and  unit  of  issue 
from  the  Item  Header  (40)  record,  and  the  nominal  division  stock  levels 
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from  the  Division  Stock  Status  (49)  records,  if  any. 

The  program  then  generates  a report  line  entry  for  each  issue  divi- 
sion for  which  transactions  were  found.  Thus,  for  each  item,  an  entry 
may  appear  on  any  or  all  of  the  four  division  reports.  The  line  entry 
contains  the  item  number  and  name,  the  unit  of  issue,  the  aggregate  issue 
quantity,  and  the  nominal  stock  level.  If  no  stock  level  is  on  file  for 
the  store,  a value  of  zero  is  given.  In  addition,  an  asterisk  is  printed 
next  to  the  stock  level  field  if  the  quantity  issued  is  greater  than  the 
nominal  stock  level. 

When  all  issue  transactions  have  been  processed,  program  execution 
terminates . 

7.10.4  Error  Messages 

If  the  Current  Transaction  file  is  found  to  be  out  of  proper  sort 
sequence,  the  following  message  is  printed,  and  program  execution  teimi- 
nates . 

'RP016-0300  - TRANSACTION  FILE  OUT  OF  SEQUENCE'. 

7.10.5  Remarks 

If  no  issues  were  processed  for  a division  store,  an  indicative 
message  is  printed  on  the  appropriate  report. 
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7.11  RP017  - Stock  Status  Report  Generator 


The  Stock  Status  Report  generator  program,  RP017,  is  designed  to 
generate  an  on-demand  report.  This  report  displays  information  describing 
the  status  of  inventory  items,  specified  in  the  report  request.  The 
format  of  the  report  request  is  described  in  Section  4.3.  In  that 
request,  the  user  may  specify  that  the  report  be  generated  for: 

(a)  all  items  under  inventory  control  on  file; 

(b)  a range  of  inventory  classes;  or 

(c)  an  individual  inventory  class. 

The  report  (see  Figure  7.11-1)  is  organized  by  house  item  number, 
in  ascending  sequence,  and  displays  for  each  item  the  following: 

(a)  House  number; 

(b)  Item  name; 

(c)  Unit  of  issue; 

(d)  Reorder  point; 

(e)  Quantity  on-hand; 

(f)  Quantity  on-order; 

(g)  Average  unit  price; 

(h)  Issue  history  for  five  quarters,  including  the  current 
quarter;  and 

(i)  Division  stock  levels. 

7.11.1  System  Interfaces 

Figure  7.11-2  is  a program  flowchart.  As  illustrated,  program 
input  consists  of: 

(a)  Report  Date  File,  CN1744.INV.S.INVDATE,  created  through 
the  execution  of  the  utility  program  lEBGENER;  and 


7-90 


QUANTITY  AVERAGE  ISSUES  ISSUES  FOR  QUARTER  ENDED  DIV 

HOUSE  NUMBER  KAME  UI  RP  ON  HAND  ON  ORDER  PRICE  QTO  XKXXX  XXXXX  XXXXX  XXXXX  03  04 


«-*  m eg 
^ m 
^ m o 

O' 


O'  at 


XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

t 1 1 I J 

^ ^ ^ ^ ^ 

1 1 1 1 1 
^ ^ ^ ^ 

Kl  pg  pQ  pQ  M 

pg  pg  pg  pg  pg 

p<g  pg  pg  pg  pg 
pg  rg  pg  »g  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

1 1 1 1 1 
^ ^ ^ 

1 1 1 1 I 
O'  ^ O'  O'  ^ 

pg  pg  pg  «g  pg 

*g  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  <g  Kj 

zz 

zz 

zz 

zz 

zz 

1 1 1 1 1 
<7*  ^ ^ ^ 

1 1 1 1 1 
0>  O'  ^ O'  0 

pg  pg  ng  pg  pg 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

1 1 1 1 1 
O'  C*  ^ ^ 

1 1 1 t 1 

O'  O'  O'  ^ 

pg  pg  ■'4  pg  pg 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

i 1 i 1 1 
0*  ^ 0*  ^ ^ 

1 1 1 1 1 
^ ^ ^ ^ ^ 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 

pg  pg  >g  pg  pg 
pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

1 1 1 1 1 

0*  0^  9" 

^ ^ O'  ^ 

1 1 1 1 1 
O'  ^ 0*  ^ O' 

^ O'  ^ O'  j 

^ ^ ^ ^ ^ 

O'  O'  ^ ^ ^ 

0*  ^ ^ ^ 

^ O'  ^ 0*  O' 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
XXXXX 

pg  pg  pg  pg  pg 
XXXXX 

^ 0*  O'  ^ 
0*  ^ ^ ^ ^ 

^ ^ ^ 
^ ^ o>  ^ ^ 

^ O'  ^ 
pg  pg  pg  pg  pg 

Nl  S S 2j  ^ 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

1 1 1 1 1 
^ ^ 0 

^ 0*  ^ ^ ^ 

1 1 1 1 ( 

O'  ^ 0 O' 

0 ^ ^ ^ ^ 

^ O'  O'  O' 

O'  ce  ^ 0 0 

•g  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
•g  pg  pg  pg  pg 

pg  pg  pg  pg  pg 

pg  pg  pg  pg  pg 
pg  pg  pg  pg  pg 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

X X X X X 
XXXXX 
XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

X X X X X 

X X X X 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

X >(  X X K 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

XXXXX 

M 

X 

X 

X 

X 


^g 


X 

X 

X 

X 


X 

X 


X 

X 

X 

X 

X 

X 


<0 

m 

eg 


7-91 


FIGURE  7.11-1 

FORMAT  OF  STOCK  STATUS  REPORT 


FIGURE  7.11-2 

RP017  PROGRAM  FLOWCHART 


STOCK  STATUS 
REPORT 
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(b)  Inventory  Master  File,  CN1744. INV.M. INVENT ( ),  updated 
through  the  execution  of  the  Inventory  Master  File  Edit/ 

Update  program,  DG300. 

Program  output  consists  of  a print  file  that  does  not  interface 
with  any  other  program. 

7.11.2  Program  Files 

No  internal  file  is  created  during  program  execution. 

7.11.3  Processing  Functions 

As  illustrated  in  Figure  7.11-2,  the  Report  Date  File  is  read.  The 
report  request  record  for  the  program  is  found,  and  the  report  options 
established.  The  user  may  request  that  all  item  classes  be  reported,  or 
a selected  range,  or  a single  class. 

The  Inventory  Master  File  is  read.  For  each  item  on  file,  a check 
is  made  to  determine  whether  the  item  class  has  been  selected  for  print- 
ing. If  an  item  has  been  selected,  the  file  records  are  examined  and 
necessary  data  extracted  for  printing. 

The  program  saves  the  following  data  for  each  item: 

(a)  from  the  Item  Header  (40)  record,  the  item  name  and  unit 
of  issue; 

(t>)  from  the  Division  Stock  Status  (49)  record,  the  stock 
level  for  divisions  03  and  04  if  on  file.  This  is  a 
special  feature  included  for  ACTD; 

(c)  from  the  Reorder  Status  (50)  record,  the  reorder  point; 

(d)  from  the  Stock  Status  (53)  record,  the  on-hand  quantity, 
the  on-order  quantity,  and  the  average  unit  price;  and 
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(e)  from  the  Monthly  Activity  (60)  record,  the  quantity  of  the 
item  issued  during  the  month.  The  quantity  issued  is  in- 
cluded in  the  appropriate  calendar  quarter  for  the  file 
record  date.  The  program  prints  data  for  the  current 
quarter  and  the  previous  four  quarters. 

When  all  data  elements  have  been  extracted  for  the  item,  a print 

line  is  generated  for  the  item  displaying  the  data. 

After  all  items  have  been  printed  for  the  user-specified  range 

of  classes,  an  attempt  is  made  to  process  additional  date  request  cards. 

Program  execution  terminates  when  all  report  requests  have  been  processed. 

7.11.4  Error  Messages 

If  an  error  is  detected,  the  appropriate  message  is  moved  to  a 
print  file  and  printed.  Error  messages  are: 

(a)  RP017-0100  ACTIVE  INVENTORY  STATUS  FILE  OUT  OF  SEQUENCE 

This  message  is  printed  if  the  Inventory  Master  File 
records  are  out  of  sequence.  Program  execution  is 
terminated  when  this  is  detected.  Also  a return  code 
of  8 is  issued,  cancelling  subsequent  job  steps. 

(b)  RP017-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  RECORD: 
DATE-RECORD 

This  message  is  printed  if  a date  record  is  fovmd,  but 
the  date  is  not  numeric.  Program  execution  is  terminated 
when  this  error  is  detected. 

(c)  RP 01 7-0 310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  the  program  was  executed 
without  a date  card.  Program  execution  is  terminated 
when  this  is  detected. 
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7. 12  RP018  - Low  Usage  Materials  Report  Generator 


The  Low  Usage  Materials  Report  Generator  program  is  designed  to 
produce  an  on-demand  report.  The  program  is  normally  executed  on  a 
monthly  basis. 

The  report  produced  is  the  Low  Usage  Materials  Items  report  (see 
Figure  7.12-1).  For  each  item  on  the  Inventory  Master  File,  a check 
is  made  to  determine  the  date  of  last  issue.  If  this  date  is  more  than 
Y days  before  the  report  date,  the  item  is  displayed  on  the  report.  The 
data  displayed  reflects  the  current  status  of  the  item,  and  the  last 
issue  information.  The  constant  Y,  the  low  use  interval,  is  available 
from  the  Inventory  Constants  File. 

Optionally,  the  user  may  restrict  the  scope  of  interrogation  to  a 
selected  range  of  item  classes,  or  override  the  low  use  interval.  Also, 
by  coding  '01'  in  the  report  option  field,  all  items  are  printed  regard- 
less of  the  date  of  last  issue.  These  date  request  options  are  discussed 
in  Section  4.3. 

7.12.1  System  Interfaces 

Figure  7.12-2  is  a program  flowchart.  Program  input  consists  of 
three  files  available  from  previous  job  steps.  These  are; 

(a)  the  Report  Date  File,  CN1744. INV. S.DATE,  created  through 
execution  of  IBM  utility  program  lEBGENER; 

(b)  the  Inventory  Constants  File,  CNl 744. INV. S. CONST,  main- 
tained by  the  Data  Acceptance  program,  DA300;  and 

(c)  the  Inventory  Master  File,  CN1744. INV. M. INVENT ( ),  main- 
tained by  the  Inventory  Master  File  Edit/Update  program, 

DG300. 

The  program  creates  one  print  file  that  does  not  interface  with 


any  other  program. 
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FIGURE  7.12-1 

FORMAT  OF  LOW  USAGE  MATERIALS  ITEMS  REPORT 
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7.12.2  Program  Files 

RP018  creates  no  internal  files. 

7.12.3  Processing  Functions 

As  illustrated  in  Figure  1 .11-2,  the  Inventory  Constants  File  is 
read.  This  file  contains  a single  record  from  which  the  low  usage 
interval  is  taken.  This  value  is  stored  in  program  working  storage 
for  use  by  the  report  generator  section.  Also,  default  values  are 
set  that  cause  the  program  to  consider  all  classes  on  file. 

Next,  the  Report  Date  File  is  read.  A request  card  is  found  for 
this  report.  The  date  is  used  as  the  report  date,  and  for  calculating 
the  low  use  date.  The  low  use  date  is  defined  as  report  date  minus 
the  low  use  Interval  (expressed  in  days).  The  user  may  override  this 
interval  by  coding  a new  interval  in  the  request  card.  Also,  the  user 
may  specify  a range  of  classes  to  be  considered.  A low  class  and/or 
high  class  may  be  coded.  If  the  low  class  only  is  coded,  that  class  alone 
is  printed.  If  the  high  class  only  is  coded,  all  classes  up  to  and  in- 
cluding that  class  are  considered.  If  both  are  coded,  only  that  range 

is  considered. 

Optionally,  if  the  '01'  report  option  is  coded,  all  items  for  the 
requested  classes  will  be  printed  regardless  of  the  date  of  last  issue, 

The  Inventory  Master  File  is  read  for  each  item  in  the  selected 
class  range.  A test  is  made  to  determine  whether  the  date  of  last  issue 
is  earlier  than  the  low  usage  test  date.  If  the  date  is  greater  than 
the  test  date,  the  item  is  not  processed,  unless  the  full  report 
option  has  been  specified.  OtherS/ise,  the  item  is  displayed  on  the 
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Low  Usage  Materials  Items  report.  The  data  items  displayed  are  the  item 
name  and  unit  of  issue  from  the  Item  Header  (40)  record,  the  average 
unit  price  and  on-hand  quantity  from  the  Stock  Status  (53)  record,  and 
the  date  of  last  issue  and  the  last  issue  quantity  from  the  Reorder 
Status  (50)  record.  In  addition,  the  on-hand  value  of  the  item  is  cal- 
cylaLed  from  the  op-hand  quantity  and  the  average  unit  pri,ce.  If  the 
full  report  option  is  requested,  and  the  last  issue  date  is  less  than 
the  test  date,  an  asterisk  is  printed  next  to  the  item  niimber. 

When  all  items  for  a class  have  been  processed,  a summary  line 
containing  the  total  class  on-hand  value  is  printed. 

After  all  requested  classes  have  been  processed,  the  program 
attempts  to  read  additional  report  request  cards ^ When  all  such 
requests  have  been  processed,  program  execution  terminates. 

7.12.4  Error  Messages 

When  an  error  occurs,  an  indicative  error  message  is  printed  and 
program  execution  terminates.  The  messages  are: 

(a)  RP018-0100  INVENTORY  MASTER  FILE  OUT  OF  SEQUENCE 

This  message  is  printed  when  the  Inventory  Master 
File  is  found  to  be  out  of  proper  sort  sequence, 

A return  code  of  8 is  issued,  causing  bypassing 
of  subsequent  job  steps. 

(b)  RP018-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  DATE-RECORD 

This  message  is  printed  if  a non-numeric  date  is 
found  in  the  Report  Date  File  for  the  program. 
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(c)  RP018-0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  no  date  record  is 
found  in  the  Report  Date  File  for  the  program. 
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7.13  RP020  - Inventory  Activity  Report  Generator 


The  Inventory  Activity  Report  Generator  is  designed  to  produce  two 
on-demand  reports.  The  program  is  normally  executed  on  a monthly  basis. 

The  reports  produced  are: 

(a)  The  Inventory  Activity  Report:  This  report  is  a listing 

of  the  dollar  value  of  receipts,  issues,  and  adjustments 
for  each  class  in  the  system.  The  report  is  made  for  a 
one-month  period  as  specified  by  the  user.  Also  given 
are  various  ratios  of  inventory  value  to  issues  for  the 
classes.  Figure  7.13-1  is  a format  of  this  report. 

(b)  The  Inventory  Activity  Abstract:  This  report  is  a listing 

of  inventory  activity  by  month  for  a period  of  13  months. 

For  each  month,  report  values  are  printed  showing  the 
total  value  of  the  inventory,  the  total  value  of  issues, 
and  ratios  of  each  of  these  to  the  number  of  vehicles  in 
the  property.  Also  a ratio  of  inventory  value  to  issues 
value  is  given.  Figure  7.13-2  is  a format  of  this  report. 

These  reports  assist  management  in  monitoring  the  value  of  the 
inventory,  as  a whole  and  by  class,  that  is  kept  on-hand. 

7.13.1  System  Interfaces 

Figure  7.13-3  is  a program  flowchart.  Program  input  consists  of 
three  data  sets  available  from  previous  job  steps.  These  data  sets 
are: 

(a)  the  Inventory  Class  Master  File,  CN1744.INV.M.INVCLASS(  ). 

This  file  is  maintained  by  the  Inventory  Master  File  Edit/ 
Update  program,  DG300.  The  version  read  is  the  most  current 
version; 

(b)  the  Inventory  Constants  File,  CN1744.INV.S. CONST,  main- 
tained by  the  Data  Acceptance  program,  DA300;  and 

(c)  thf  Report  Date  File,  CN1744. INV. S.DATE,  created  through 
the  execution  of  IBM  utility  program  lEBGENER. 

Program  output  consists  of  one  print  file  that  does  not  interface 
with  any  other  program. 
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FIGURE  7.13-1 

FORMAT  OF  INVENTORY  ACTIVITY  REPORT 
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FIGURE  7.13-2 

FORMAT  OF  INVENTORY  ACTIVITY  ABSTRACT 
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FIGURE  7.13-3 

RP020  PROGRAM  FLOWCHART 


7.13.2  Program  Files 


Program  RP020  creates  no  internal  file. 

7.13.3  Processing  Functions 

As  illustrated  in  Figure  7.13-3,  the  Inventory  Constants  File  is 
read.  This  file  contains  a single  record  specifying  the  various  system 
constants.  From  the  record,  the  value  of  the  number  of  vehicles  in  the 
property  is  moved  to  program  working  storage.  If  the  value  equals  zero, 
a default  value  of  one  is  assigned. 

Next,  the  Report  Date  File  is  read  and  the  request  date  for  the 
report  is  moved  to  working  storage  in  the  program.  Using  the  requested 
month  and  year  as  a base,  the  program  calculates  and  saves  the  dates  of 

the  15  previous  months.  Thus,  a total  of  16  months  are  considered. 

The  program  reads  the  Inventory  Class  Master  File.  For  each  class 
on  file,  several  values  are  calculated.  These  values  include  the  be- 
ginning balance,  receipts,  issues,  and  adjustments  for  the  report  month. 
Also  saved  are  the  issues  and  beginning  balance  for  the  month  previous 
to  the  report  month  and  for  the  last  quarter.  For  each  of  the  16  months 
to  be  considered,  values  saved  include  the  beginning  and  ending  balance, 
and  the  total  issues.  All  of  these  calculations  are  made  from  the  file 
records  of  the  Inventory  Class  Master  File,  M.INVCLASS(  ).  The  resul- 
tant values  are  stored  in  arrays  located  in  program  working  storage. 

For  each  class  on  the  Class  Master  File,  a series  of  calculations 
is  made.  The  calculations  affect  the  various  class  values  and  the 
monthly  values  being  stored  by  the  program. 
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The  calculations  are: 


(a)  the  beginning  on-hand  value  from  the  Stock  Status  (53) 
record  initializes  the  class  value;  and 

(b)  for  each  Monthly  Activity  (60)  record  the  program  does 
the  following: 

(1)  if  the  record  is  for  the  report  month,  the  values 
of  issues,  receipts,  and  adjustments  are  stored  in 
working  storage  for  the  class; 

(2)  if  the  record  is  for  a month  previous  to  the  report 
month,  the  values  of  issues,  receipts,  and  adjustments 
are  combined  and  added  to  the  class  value.  This  pro- 
cedure gives  the  class  beginning  balance  for  the 
report  month; 

(3)  if  the  record  is  for  the  month  previous  to  the 
report  month,  the  value  of  issues  is  stored  in 
working  storage.  If  it  is  for  the  quarter  previous 
to  the  report  month,  the  value  of  issues  is  stored 
in  working  storage;  and 

(4)  if  the  record  is  dated  after  the  report  month, 
it  is  ignored. 

In  addition,  several  calculations  are  made  for  use  in  generating  the 
Inventory  Abstract  report.  For  up  to  13  months,  ending  with  the  re- 
quested report  month,  the  values  of  issues,  receipts,  and  adjustments 
are  combined  to  yield  an  ending  balance  for  each  month.  Also,  a sum- 
mation of  issues  is  made  for  each  of  the  months  to  be  printed. 

When  all  records  have  been  processed  from  the  Class  Master  File, 
the  program  branches  to  the  report  generation  phase.  The  first  report 
produced  is  the  Inventory  Activity  Report. 

For  each  class  on  the  Class  Master  File,  one  print  line  is  generated 
that  summarizes  activity  against  that  class  for  the  report  month.  In 
addition  to  the  monthly  beginning  balance,  receipts,  issues,  and  ad- 
justments taken  from  the  Class  Master  File,  six  other  values  are  reported. 
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These  values  are: 


(a)  ending  balance.  This  equals  the  beginning  balance  plus 
receipts  and  adjustments,  minus  issues; 

(b)  value  change.  This  equals  beginning  balance  minus  ending 
balance; 

(c)  percent  change.  This  is  the  ratio  of  the  value  change  to 
the  beginning  balance;  and 

(d)  three  inventory  values — issues  ratios.  These  ratios  are 
of  the  inventory  value  to  the  value  of  issues  for  three 
time  periods.  The  time  periods  are  the  report  month, 
the  previous  month,  and  for  the  quarter  ending  with  the 
previous  month. 

After  a print  line  has  been  generated  for  each  class,  a summary 
line  is  produced.  This  line  displays  the  same  data  elements  as  described 
above  for  the  aggregate  of  all  classes.  Also,  informative  notes  are 
printed  to  assist  the  user  in  interpreting  the  report. 

The  second  report  generated  is  the  Inventory  Abstract  Report.  One 
print  line  is  generated  for  up  to  13  months  ending  with  the  requested 
report  month.  If  less  than  13  months  are  on  file,  then  only  that  num- 
ber is  printed.  For  each  month,  five  data  items  are  given:  the  ending 

balance,  the  monthly  issues,  and  three  ratios.  The  ratios  are: 

(a)  inventory  value  per  bus.  This  is  a ratio  of  the  inventory 
ending  balance  to  the  number  of  vehicles  in  the  property. 

The  nxjmber  of  vehicles  is  available  from  the  Inventory 
Constants  File; 

(b)  monthly  issues  per  bus.  This  is  a ratio  of  the  value  of 
monthly  issues  to  the  number  of  vehicles;  and 

(c)  inventory  value  to  Issues.  This  is  a ratio  of  the  beginning 
balance  to  the  monthly  issues. 

When  the  monthly  data  has  been  printed,  an  average  line  is  printed. 
This  line  displays  the  same  data  items  as  described  above  for  the  averages 
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of  the  individual  monthly  values.  If  all  13  months  have  been  printed, 
a second  average  line  is  generated.  This  displays  averages  based  on 
the  12  months  previous  to  the  report  month. 

When  both  reports  have  been  generated,  program  execution  terminates. 
7.13.4  Error  Messages 

If  an  error  is  detected,  the  appropriate  message  is  printed,  and 
program  execution  terminated.  Error  messages  are: 

(a)  RP020-0100  CLASS  MASTER  FILE  OUT  OF  SEQUENCE 

The  input  Class  Master  File  was  found  to  be  out  of 
proper  sort  sequence.  In  addition  to  the  printing  of 
the  message,  a return  code  of  8 is  generated.  This  will 
cancel  execution  of  subsequent  job  steps. 

(b)  RP02 0-0300  INVALID  DATA  FOUND  IN  DATE  FILE  DATA  FIELD: 

DATE  VALUE 

A non-numeric  date  was  found  for  this  report  in  the 
Report  Date  File. 

(c)  RP020-03I0  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

A date  request  record  for  the  report  was  not 
found  in  the  Report  Date  File. 

(d)  RP020-0310  CLASS  RECORDS  ON  FILE  NOT  FOR  REPORT  PERIOD 

No  Monthly  Activity  (60)  records  were  found  on  the 
Class  Master  File  for  the  report  month  requested. 

(e)  RP020-0310  NO  MONTHLY  CLASS  RECORDS  FOUND  ON  FILE 

The  input  Class  Master  File  was  found  to  be  a null 
file. 
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7.13.5  Remarks 


In  addition  to  the  request  date  code  *20  submitted  for  these  reports, 
the  program  reads  a '00'  request  code  if  present.  This  request  card 
provides  the  date  of  execution  of  the  program  that  is  printed  on  the 
reports.  If  this  record  is  not  found,  the  date  of  execution  is  given 
a value  of  zero. 

In  generating  the  two  reports,  the  following  conventions  are  used: 
negative  values  are  indicated  by  enclosing  the  value  in  brackets,  and 
ratios  equal  to  or  more  than  1000.0  are  reported  as  999.9. 
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7. 14  RP022  - Outstanding  Purchase  Orders  Report  Generator 


The  Outstanding  Purchase  Orders  Report  Generator  program,  RP022, 
is  designed  to  produce  an  on-demand  report.  The  program  is  normally 
executed  on  a monthly  basis. 

The  report  produced  is  the  Outstanding  Purchase  Orders  Report 
(see  Figure  7.14-1).  It  is  designed  to  assist  management  in  analyzing 
the  performance  of  vendors  in  responding  to  orders.  For  each  vendor, 
a record  of  all  unfilled  purchase  orders  is  printed.  The  orders  dis- 
played are  those  unfilled  for  a user-specified  number  of  days.  The  value 
of  each  unfilled  order  is  displayed,  as  well  as  the  total  value  of  un- 
filled orders  to  that  vendor. 

7.14.1  System  Interfaces 

Figure  7.14-2  is  a program  flowchart.  As  illustrated,  program 
input  consists  of  four  data  sets  available  from  prior  job  steps.  These 
dat  sets  are: 

(a)  the  Report  Date  File,  CN1744. INV. S . DATE,  created  through 
the  execution  of  the  utility  program  lEBGENER; 

(b)  Inventory  Constants  File,  CN1744. INV. S . CONST,  maintained 
by  the  Data  Acceptance  program,  DA300; 

(c)  Vendor  Reference  File,  CN1744. INV. M. VENDOR,  maintained  by 
the  Data  Acceptance  program,  DA300;  and 

(d)  Inventory  Master  File,  CN1744. INV. M. INVENT,  updated  by 
the  Inventory  Master  File  Edit/Update  program,  DG300. 

Program  output  consists  of  one  print  file  that  does  not  interface 
with  any  other  program. 
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FIGURE  7.14  1 

FORMAT  OF  OUTSTANDING  PURCHASE  ORDERS  REPORT 
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7.14.2  Program  Files 

The  program  creates  one  internal  file,  the  Outstanding  Purchase  Older 
Report  File,  during  execution.  The  file  is  described  by  File  and  Record 
Specifications  in  Tables  7.14-1  and  7.14-2. 

7.14.3  Processing  Functions 

As  illustrated  in  Figure  7.14-2,  the  Inventory  Constants  File  is 
read.  This  file  contains  a single  record  with  all  system  constants. 

The  program  takes  the  unfilled  order  interval  from  the  record  and  saves 
it  in  program  working  storage.  The  Report  Date  File  is  read,  and  the 
request  date  record  for  the  program  found.  A test  date  is  calculated 
as  follows: 

report  date  - the  unfilled  orders  interval. 

This  date  is  using  in  evaluating  the  status  of  the  Purchase  Order  records. 

For  each  Purchase  Order  Status  (55)  record  on  the  Inventory  Master 
File,  two  tests  are  made.  If  the  Purchase  Order  date  is  less  than  the 
computed  test  date,  and  if  the  order  is  unfilled,  the  order  is  a report 
candidate.  For  each  such  unfilled  order,  an  extract  record  is  created 
and  released  to  the  COBOL  internal  sort  routine.  Each  extract  record 
consists  of  the  item  number  and  name,  the  unit  of  issue,  the  Purchase 

Order  number  and  date,  the  order  price,  the  order  quantity,  and  the 
back  order  quantity.  These  data  items  are  available  from  the  file 
records  for  the  item  under  consideration. 

When  all  Purchase  Order  records  have  been  examined,  the  extract 
records  are  sorted  on  vendor  code  and  Purchase  Order  number.  For  each 
sorted  record,  one  line  is  printed.  The  data  displayed  is  that  from 
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TABLE  7.1A-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME;  Outstanding  Purchase  Order  Report  File 
DATA  SET  NAME;  &REPORT 

NUMBER  OF  FORMATS;  1 RECORD  SIZE;  65  Character 

FILE  ORGANIZATION;  Sequenced  by:  Vendor  Number 

Purchase  Order  Number 


RECORD  FORMATS 

record  NAME  MAX.  NO. 

Outstanding  Purchase  Order  U 

Record 


MIN.  NO. 
0 
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TABLE  7.14-2 


RECORD  SPECIFICATION 


FIELD  NAME:  Outstanding  Purchase  Order  Record 

FILE  NAME:  Outstanding  Purchase  Order  Report  File 

COBOL  NAME  OF  RECORD;  REPORT-RECORD 
RECORD  LENGTH;  65  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

11 

X(ll) 

R-PART-NBR 

12 

15 

X(15) 

R- ITEM-NAME 

27 

2 

XX 

R-UNIT-MSRE 

29 

5 

9(5) 

R-VEN-ID 

34 

6 

X(6) 

R-PO-NBR 

40 

7 

9(5)V99 

R-PO-QTY 

47 

7 

S9(5)V99 

R-BO-QTY 

54 

6 

9(6) 

R-O-DTE 

60 

6 

9(4)V9(4) 

R-PRICE 

TOTAL 

65 

FIELD  DESCRIPTION 

Item  Number 
Item  Name 
Unit  of  Issue 
Vendor  Number 
Purchase  Order  Number 
Order  Quantity 
Back  Order  Quantity 
Order  Date 

Purchase  Order  Price 
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the  extract  record.  Also  printed  is  the  value  of  the  back  order  quantity, 
computed  by  multiplying  the  quantity  by  the  order  price. 

The  report  is  organized  by  vendor  code,  with  a change  in  code  causing 
a new  page  to  be  started.  Within  vendor  code,  the  data  is  displayed  in 
Purchase  Order  number  order.  More  than  one  item  entry  may  appear  under 
a Purchase  Order  number.  Also  printed  is  a total  line  of  the  outstanding 
order  value  for  each  Purchase  Order,  and  a vendor  summary. 

When  all  extract  records  have  been  printed,  program  execution  ter- 
minates . 

7.14.4  Error  Messages 

If  an  error  is  detected  during  program  execution,  an  indicative 
message  is  printed,  and  program  execution  terminates.  The  messages  are: 

(a)  RP022-0100  ACTIVE  INVENTORY  STATUS  FILE  OUT  OF  SEQUENCE 

This  message  is  printed  if  the  Inventory  Master  File  is 
found  to  be  out  of  proper  sort  sequence.  A return  code 
of  8 is  issued,  causing  subsequent  job  steps  to  be  by- 
passed. 

(b)  'RP022-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  DATE  FILE' 

This  message  is  printed  if  the  date  request  record  for 
the  program  contains  a non-numeric  date. 

(c)  RP022-0300  INVALID  DATA  FIELD  OR  RECORD  FOUND  IN  CONSTANT-FILE 

This  message  is  printed  if  an  invalid  unfilled  orders 
interval  is  found  in  the  Inventory  Constants  File. 

(d)  RP022-0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  the  program  was  executed 
without  a valid  date  card. 


7.15  RP024  - Vendor  File  List 


The  Vendor  File  List  program,  RP024,  is  designed  to  generate  a report 
displaying  the  contents  of  the  Vendor  Reference  File.  The  report,  which 
is  an  on-demand  report,  displays  the  vendor  name  records  in  a format  (see 
Figure  7.15-1)  that  is  easy  to  interpret.  The  vendor  select  card,  described 
in  Section  4.2,  specifies  a range  of  vendor  codes,  for  which  report  lines 
are  generated.  If  the  high  vendor  code  is  not  given,  the  report  will  in- 
clude all  vendors  up  to  vendor  code  10,000.  This  default  upper  limit  has 
been  specified  to  limit  program  execution  since  the  processing  time  to 
read  the  entire  ISAM  file  can  be  expensive. 

7.15.1  System  Interfaces 

Figure  7.15-2  is  a program  flow  chart.  As  illustrated,  program  input 
consists  of  the  Vendor  Select  Card  File  and  the  Vendor  Reference  File, 

CN 17 44. INV.M. VENDOR. 

Program  output  consists  of  a print  file  that  does  not  interface  with 
any  other  program. 

7.15.2  Program  Files 

No  internal  file  is  created  during  program  execution. 

7.15.3  Processing  Functions 

As  illustrated  in  Figure  7.15-2,  the  Vendor  Select  Card  File  is  read. 
The  contents  of  the  select  card  provides  report  control.  If  the  user  has 
not  snecified  a range  of  vendor  codes,  the  program  uses  default  values 
to  define  a range,  1-10,000. 

The  Vendor  Reference  File  is  an  Indexed  Sequential  Access  file.  The 
file  is  searched  for  each  vendor  code,  beginning  with  the  low  code  specified 
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FIGURE  7.15-1 

FORMAT  OF  VENDOR  FILE  LIST 


FIGURE  7.15-2 

RP024  PROGRAM  FLOWCHART 
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in  the  Vendor  Select  Card.  The  record  is  reformatted  for  report  purposes 
and  printed.  When  all  vendor  codes  through  the  specified  high  code  have 
been  printed,  program  execution  terminates. 

7.15.4  Error  Messages 

No  error  message  is  printed  by  this  program. 
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7 . 16  RP060  - Receiving  Report  Generator 


The  Receiving  Report  Generator  program  is  designed  to  generate  a 
standard  report.  The  program  is  normally  executed  whenever  the  regular 
weekly  run  is  made. 

The  program  generates  two  reports:  the  Receiving  Report  and  the 

Amendment  to  Receiving  Report  that  are  of  similar  format  (see  Figure 
7.16-1).  The  reports  display  the  contents  of  Purchase  Order  transactions 
processed  during  the  current  system  run.  A separate  page  is  generated 
for  each  Purchase  Order  issued  to  a vendor.  The  page  may  contain  data 
for  more  than  one  item  number.  The  data  printed  includes  the  item  num- 
ber and  name,  the  reorder  point,  the  Purchase  Order  quantity  and  price, 
and  the  value  of  the  Purchase  Order. 

The  purchase  orders  are  displayed  according  to  whether  they  are 
original  or  an  update  to  an  existing  Purchase  Order.  If  the  order  is 

an  original,  the  page  heading  is  "Receiving  Report".  If  the  order  is 

an  update,  the  page  heading  is  "Amendment  to  Receiving  Report". 

7.16.1  System  Interfaces 

Figure  7.16-2  is  a program  flowchart.  As  illustrated,  program 

input  consists  of  two  data  sets  available  from  prior  job  steps: 

(a)  the  Purchase  Order  Transaction  File,  CN1744. INV.M. POTRANS , 
created  by  the  Inventory  Master  File  Edit/Update  program, 

DG300;  and 

(b)  the  Vendor  Reference  File,  CN1744 . INV.M. VENDOR,  main- 
tained by  the  Data  Acceptance  program,  DA300. 

Program  output  consists  of  one  print  file  that  does  not  interface 
with  any  other  programs. 


7-121 


CARO  COLUMNS 

iiiiiiiiiiiuiiiiiiiiiiiuiiimi 

1111  mil  122222222223333333333444444 ‘.^«455555555556666666666777777r777888888888899999999990000000000llll  1111112222222222333 
2345678901234567  8901234561890123456  789012345678901234567890123456  7890123456789012  34567890123456  789012345678901234567890123456789012 


X 

X 

X 


X X 

< X 
Z X 

I X 
K X 
M X 
</)  X 
Z X 

< X 
a X 
K X 

t X 
l/>  X 


z a 
< ac 
3 O 


O <S  I 
U X t 
O 3 I 
< Z'  I 


7-122 


FIGURE  7.16-1 

FORMAT  OF  RECEIVING  REPORT 


FIGURE  7.16-2 

RP060  PROGRAM  FLOWCHART 
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7116.2  Program  Files 

During  execution,  one  internal  program  file  is  created.  This  is 
the  Sorted  Purchase  Order  File,  &&SRTPO,  described  in  file  and  record 
specifications  in  Tables  7.16-1  and  7.16-2. 

7.16.3  Processing  Functions 

As  illustrated,  the  Purchase  Order  Transaction  File  is  read.  For 
each  transaction  on  file,  an  extracted  record  is  created.  The  record 
is  released  to  the  internal  COBOL  sort  routine.  The  resultant  file  is 
sorted  on  the  Purchase  Order  type,  the  vendor  number,  the  Purchase  Order 
number,  and  the  item  number.  This  sequence  is  necessary  to  the  genera- 
tion of  the  report. 

The  sorted  extract  file  is  read.  For  each  record,  a determination 
of  the  Purchase  Order  number  is  made.  If  the  Purchase  Order  is  a new 
order  number,  a new  page  is  generated  with  appropriate  headings  identify- 
ing the  vendor  and  Purchase  Order  number.  The  heading  also  includes  the 
vendor  name  retrieved  from  the  Vendor  Reference  File.  If  a name  is  not 
on  file  for  the  vendor  code,  an  Indicative  message  is  printed  in  place 
of  the  name.  The  report  title  printed  is  determined  by  the  Purchase  Order 
type.  A value  of  zero  indicates  an  original  transaction,  and  the  title 
is  "Receiving  Report".  All  other  values  denote  an  amendment,  and  the 
title  is  "Amendment  To  Receiving  Report". 

For  each  record,  one  print  line  is  displayed.  It  contains  the  item 
name  and  number,  the  reorder  point,  the  order  quantity  and  price,  and 
the  Purchase  Order  value.  The  value  is  determined  by  multiplying 
the  order  quantity  by  the  price.  The  value  does  not  include  any  sales 
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TABLE  7.16-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME:  Sorted  Purchase  Order  File 


DATA  SET  NAME:  &&SRTPO 


NUMBER  OF  RECORD  FORMATS:  1 


RECORD  SIZE:  70  Characters 


FILE  ORGANIZATION:  Sequenced  by:  Purchase  Order  Type 

Vendor  Number 

Purchase  Order  Number 
Item  Number 

RECORD  FORMATS 


RECORD  NAME 


MAX.  NO 


MIN.  NO 


Purchase  Order  Record 


U 


0 
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TABLE  7.16-2 


RECORD  SPECIFICATION 


RECORD  NAME;  Purchase  Order  Record 
FILE  NAME;  Sorted  Purchase  Order  File 
COBOL  NAME  OF  RECORD;  I-SORTED-RECORD 
RECORD  FORMAT  CODE;  0A,  0N 
RECORD  LENGTH:  70  Characters 


field 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

2 

XX 

I-PO-FORMAT-CDE 

3 

1 

X 

I-PO- INDICATOR 

4 

6 

9(6) 

I-PO-NBR 

10 

5 

X(5) 

PO- VENDOR-NO 

15 

3 

X(3) 

FILLER 

18 

6 

9(6) 

I-PO-DATE 

24 

11 

X(ll) 

I-PO- ITEM 

35 

2 

X(37) 

I-PO-UM 

37 

7 

9(5)V99 

I-PO-ORDER-QTY 

44 

8 

9(4)V9(4) 

I-PO-ORDER-PRICE 

52 

15 

X(15) 

I-PO- ITEM-NAME 

67 

4 

V9(4) 

I-PO-SALES-TAX 

TOTAL 

70 

FIELD  DESCRIPTION 

Format  Code 
Purchase  Order  Type 
Purchase  Order  Number 
Vendor  Nximber 

Purchase  Order  Date 

Item  Number 

Unit  of  Issue 

Order  Quantity 

Order  Price 

Item  Name 

Sales  Tax  Factor 
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tax  that  is  applied.  The  sales  tax  value  is  printed  on  the  summary  line 
below.  However,  an  asterisk  is  printed  next  to  the  value  if  no  sales 
tax  is  to  be  applied.  Also  printed  is  a row  of  blanks  to  be  used  to 
record  receipts  against  the  Purchase  Order. 

When  all  records  for  a Purchase  Order  number  have  been  printed, 
a summary  is  printed  of  the  total  Purchase  Order  value.  The  cost  in- 
cludes an  aggregate  of  all  individual  item  values  for  the  Purchase  Order. 
A second  line  is  printed  reflecting  the  total  sales  tax  to  be  applied 
to  the  Purchase  Order.  Finally,  a total  line  is  printed  which  shows 
the  sum  of  the  order  value  and  sales  tax. 

Program  execution  terminates  when  all  Purchase  Order  transactions 
have  been  processed. 

7.16.4  Error  Messages 

The  program  generates  no  error  message. 
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7 . 17  INVLST  - Inventory  Master  File  List 


The  Inventory  Master  File  List  program  provides  management  with  the 
capability  of  examining  the  contents  of  the  Inventory  Master  File.  The 
user  specifies: 

(a)  the  inventory  items  for  which  file  records  are  to  be 
displayed;  and 

(b)  the  types  of  records  to  be  displayed. 

The  program  generates  formatted  listings  in  accord  with  the  user 
request.  The  report  format  is  given  in  Figure  7.17-1.  The  request  may 
pertain  to  individual  items,  a series  of  items,  or  several  series  of 
items. 

Record  types  that  can  be  listed  are: 

Format  Code  Type 


7.17.1  System  Interfaces 

Figure  7.17-2  is  a program  flowchart.  As  illustrated,  program 
input  consists  of  the  File  Records  Select  Card  File,  and  the  Inventory 
Master  File,  M. INVENT.  Since  the  program  is  normally  executed  on  a 
stand-alone  basis,  the  generation  of  the  Inventory  Master  File  input 
to  the  program  is  version  zero  (0) . 

Program  output  consists  of  one  print  file  that  does  not  interface 
with  any  other  program. 
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FIGURE  7.17-2 
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7.17.2  Program  Files 


No  internal  files  are  created  during  program  execution. 

7.17.3  Processing  Functions 

As  illustrated  in  Figure  7.17-2,  the  File  Records  Select  Card  File 
is  read.  The  contents  of  the  request  cards  provide  report  control  and 
record  selection  information.  The  format  of  the  request  cards  is  speci- 
fied in  Section  4.2. 

Each  request  card  is  edited  against  a set  of  edit  criteria.  The 
criteria  are  as  follows: 

(a)  the  low  item  number  must  be  coded,  and  greater  than  the 
largest  item  number  specified  in  the  previous  request 
card; 

(b)  the  high  item  number  must  be  coded  if  the  user  is  selecting 
a range  of  inventory  items.  If  it  is  coded,  it  must  be 
greater  than  or  equal  to  the  low  item  number;  and 

(c)  the  report  option  must  be  spaces  (the  default  report  option), 
one  (1),  or  two  (2).  Any  other  value  is  set  to  the  de- 
fault value  of  spaces. 

If  a request  card  is  in  error,  the  card  is  rejected  and  displayed 
on  the  Selection  Card  Edit  List  Report.  If  the  card  is  valid,  the 
programs  reads  the  Inventory  Master  File,  selects  the  requested  item 
numbers,  and  prints  the  desired  file  records. 

When  the  standard  report  option  is  requested,  all  file  records  are 

printed.  The  data  displayed  are  reformatted  for  ease  of  reading  by  the 
user.  Two  other  print  options  are  available.  If  a one  (1)  is  coded, 
all  file  records,  with  the  exception  of  the  Monthly  Activity  (60) 
records,  are  displayed.  If  a two  (2)  is  coded,  all  file  records,  with 
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the  exception  of  the  Purchase  Order  Status  (55)  and  the  Purchase  Order 
Accounting  (56)  records,  are  printed. 

When  the  request  card  has  been  processed,  the  program  branches 
back  to  read  the  next  card,  edit  its  contents,  and  print  the  requested 
file  records.  Program  execution  is  terminated  when  all  cards  have  been 
processed. 

7.17.4  Error  Messages 

The  program  generates  no  error  message. 

7.17.5  Remarks 

Any  number  of  request  cards  may  be  input  for  a program  execution. 
The  user  should  be  careful  to  submit  request  cards  in  increasing  order 
by  item  number.  Those  found  to  be  out  of  sequence  are  rejected. 
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7.18  DA250  - Price  Correction  Processor 


The  Price  Correction  Processor  program,  DA250,  is  a special  purpose 
program  run  on  an  as-required  basis.  The  program  is  designed  to  assist 
management  to  correct  the  order  price  for  purchase  orders  against  which 
transactions  have  been  processed.  The  basic  methodology  is  to  generate 
standard  inventory  transactions  to  reverse  the  transactions  processed, 
create  a Purchase  Order  (OA)  transaction  to  change  the  price,  and  re- 
submit the  original  transaction  data.  These  transactions  qre  input 
to  the  Inventory  Master  File/Update  program,  DG300,  for  updating  of 
the  Inventory  Master  File. 

The  program  can  process  up  to  ten  Purchase  Order  corrections  during 
a run,  with  multiple  Purchase  Order  changes  to  a single  item  number 
permissible. 

7.18.1  System  Interfaces 

Figure  7.18-1  is  a program  flowchart.  Program  input  consists  of 
two  files.  These  are: 

(a)  the  Transaction  History  File,  CN1744. INV.M.TRANTAPE,  main- 
tained by  the  Transaction  History  File  Update  program,  RPOOO; 
and 

(b)  the  Price  Correction  Card  File,  PCTRAN,  submitted  by  the 
user  on  punched  cards. 

Program  output  consists  of  the  Temporary  Storage  Transaction  File, 
CN1744.INV.M.SRTEMP.  This  file  is  input  to  the  Inventory  Master  File 
Edit/Update  program,  DG300:,  for  processing. 
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EXIT 


FIGURE  7.18-1 

DA250  PROGRAM  FLOWCHART 
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7.18.2  Program  Files 


The  program  creates  three  internal  files  during  execution.  These 


are : 

(a)  the  Price  Correction  Sort  File,  &OCARD,  used  to  sort  the 
input  price  correction  cards.  File  and  Record  specifications 
are  given  in  Tables  7.18-1  and  7.18-2; 

(b)  the  Transaction  Extract  File,  &ETRANS,  used  to  store  trans- 
actions extracted  from  the  Transaction  History  File.  File 
and  record  specifications  are  given  in  Tables  7.18-3  and 
7.18-4;  and 

(c)  the  Temporary  Transaction  File,  &STEMP,  used  to  sort  the 
program-generated  transactions.  File  and  record  specifi- 
cations are  given  in  Tables  7.18-5  and  7.18-6. 

7.18.3  Processing  Functions 

As  illustrated  in  Figure  7.18-1,  the  Price  Correction  Card  File  is 
read.  This  file  contains  records  of  Purchase  Order  prices  to  be  changed. 
Each  record  is  edited  as  follows: 

(a)  the  record  code  must  be  'PC', 

(b)  the  item  number  must  not  be  spaces,  and 

(c)  the  price  value  must  be  numeric  and  non-zero. 

Records  in  error  are  rejected  and  displayed  on  the  Price  Correction  Edit 
List  with  an  asterisk  under  the  field  in  error.  Valid  records  are 
released  to  the  COBOL  internal  sort  routine  for  sequencing  on  item  num- 
ber. A maximum  of  10  valid  change  cards  can  be  processed.  Extra  cards 
are  rejected  and  displayed  on  the  edit  list. 

When  the  price  change  records  have  been  sorted,  the  Transaction 
History  File  is  read.  All  transactions  for  the  input  item  numbers  are 
spooled  to  a temporary  extract  file.  If  no  transactions  are  found  for 
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TABLE  7.18-1 


PROGRAM  FILE  SPECIFICATION 

FILE  NAME:  Price  Correction  Sort  File 

DATA  SET  NAME:  &OCARD 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE;  27  Characters 

FILE  ORGANIZATION;  Records  are  sequenced  by:  Item  Number 


RECORD  FORMATS 

Purchase  Order  Number 

RECORD  NAME 

MAX.  NO.  MIN.  NO. 

Price  Correction  Card 
Record 

10  1 
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TABLE  7.18-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Price  Correction  Card  Record 

FILE  NAME;  Price  Correction  Sort  File 
COBOL  NAME  OF  RECORD:  0-CARD-REC 


RECORD  LENGTH:  27  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

FILLER 

3 

11 

X(ll) 

WS-PART-NBR 

Item  Number 

14 

6 

X(6) 

WS-PO-NBR 

Purchase  Order  Number 

20 

8 

9(4)V9(4) 

WS-PRICE 

New  Purchase  Order  Price 

TOTAL 

27 
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TABLE  7.18-3 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME;  Transaction  Extract  File 
DATA  SET  NAME;  &ETRANS 

NUMBER  OF  RECORD  FORMATS;  1 RECORD  SIZE;  107  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  by;  Processing  Date 

Item  Number 

Transaction  Date 
Transaction  Code 

RECORD  FORMATS 

RECORD  NAME  MAX.  NO.  MIN.  NO. 

Transaction  Extract  Record  U 0 
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TABLE  7.18-4 


RECORD  SPECIFICATION 

RECORD  NAME:  Transaction  Extract  Record 

FILE  NAME:  Transaction  Extract  File 

” « 

COBOL  NAME  OF  RECORD:  EXT- TRAN S-RECl 

RECORD  LENGTH:  107  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

99 

X(99) 

FILLER 

Transaction  Data  (A) 

100 

8 

S9 (4)V9 (4)EXT-AVG-PRICE 

Average  Unit  Price 

TOTAL 

107 

Note:  (A)  The  record  specification  for  the  first  99  characters  is 

the  same  as  for  the  Temporary  Storage  Transaction  File, 
M.SRTEMP  (see  Section  6.5). 
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TABLE  7.18-5 


PROGRAM  FILE  SPECIFICATION 

FILE  NAME;  Temporary  Transaction  File 
DATA  SET  NAME:  &STEMP 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE;  105  Characters 

FILE  ORGANIZATION;  Records  are  sequenced  by:  Internal  Sort  Code 

RECORD  FORMATS 

RECORD  NAME  MAX.  NO.  MIN.  NO. 

Sorted  Temporary  Record  U 0 
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TABLE  7.18-6 


RECORD  SPECIFICATION 

RECORD  NAME;  Sorted  Temporary  Record 
FILE  NAME:  Temporary  Transaction  File 

COBOL  NAME  OF  RECORD;  SORT-EXT-REC 
RECORD  LENGTH:  105  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

99 

X(99) 

FILLER 

Transaction  Data  (A) 

100 

6 

X(6) 

SORT-SEQ-IND 

Internal  Sort  Code 

TOTAL  105 


Note:  (A)  The  record  format  for  the  first  99  characters  is  the  same 

as  for  the  Temporary  Storage  Transaction  File,  M.SRTEMP 
(see  Section  6.5). 
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any  of  the  input  item  numbers,  an  indicative  message  is  printed  on  the 
Price  Correction  Edit  List. 

Next,  the  extract  file  is  read,  and  transactions  for  the  first  item 
number  examined.  The  file  is  read  until  the  first  receipt  transaction 
(6A)  is  found  for  the  Purchase  Order  to  be  changed.  If  multiple  pur- 
chase orders  are  being  processed  for  one  item  number,  the  first  applicable 
6A  is  used.  Beginning  with  this  transaction,  the  program  generates  re- 
versing transactions  for  those  on  file.  The  reversal  is  accomplished 
by  changing  the  transaction  code  to  a code  causing  an  opposite  action. 

Table  7.18-7  describes  each  transaction  processed  by  the  program  and  the 
reversing  transaction  created.  The  transactions  are  released  to  the 
COBOL  internal  sort  routine.  The  transaction  consists  of  a 99-character 
record,  in  the  format  necessary  for  processing  by  the  Inventory  Master 
File  Edit/Update  program,  DG300,  and  a 6-character  sort  key.  This 
sort  key  consists  of: 

(a)  the  record  type  code.  A zero  means  a generated  transaction; 
six  means  an  original  transaction;  and  five  means  a Purchase 
Order  correction;  and 

(b)  a sequence  nxomber.  This  number  starts  at  zero  and  increases 
for  Purchase  Order  correction  and  original  transactions. 

The  sequence  number  for  program-generated  reversing  trans- 
actions begins  at  99999  and  decrements. 

This  sort  key  assures  that  the  transactions  will  be  processed  in 
the  following  order:  generated  transactions  to  reverse  user-submitted 

transactions.  Purchase  Order  transactions  to  change  the  price,  and  original 
transactions  resubmitted. 
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TABLE  7.18-7 


PRICE  CORRECTION  GENERATED  TRANSACTIONS 


Transaction  Type 

Original  Code 

Generated  Code 

Issue  and  Issue  Credit 

8A,  8N,  lA,  IN 

8N,  8A,  IN,  lA 

Materials  Receipt 

6A,  6N 

6N,  6A 

Vendor  Return 

7A,  7N 

7N,  7 A 

Average  Unit  Price  Change 

EA 

EA  (A) 

Quantity  Adjustment 

2A,  2N 

2N,  2 A 

3A,  3N 

3N,  3A 

4A,  4N 

4N,  4A 

(A)  The  reversing  EA  transaction  is  created  using  the  price  on 
file  before  the  EA  was  processed.  This  is  available  from 
the  last  transaction  processed  before  the  EA. 
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When  all  transactions  have  been  processed  from  the  extract  file 
for  the  item  number  and  associated  purchase  orders,  a Purchase  Order  (OA) 
transaction  to  effect  each  price  change  is  created  and  released  to  the 
sort  routine. 

If  a Purchase  Order  number  is  not  found  on  the  transaction  file, 
an  indicative  message  is  printed  on  the  edit  list.  The  extract  file  is 
read  once  for  each  item  number  input.  When  all  input  price  correction 
requests  have  been  processed,  the  program  creates  the  transaction  file 
for  input  to  the  adit/update  process. 

The  sorted  Temporary  Transaction  File  is  read.  For  each  record  on 
file,  a 99-character  record  is  created  by  stripping  off  the  6-character 
internal  sort  key.  The  resultant  transaction  records  are  written  to  the 
Temporary  Storage  Transaction  File,  M.SRTEMP.  When  all  of  the  sorted 
records  have  been  processed,  program  execution  terminates. 

7.18.4  Error  Messages 

The  program  prints  no  error  message. 

7.18.5  Remarks 

If  no  transactions  are  written  to  the  Temporary  Storage  Transaction 
File,  a return  code  of  16  is  issued  causing  subsequent  job  steps  to  be 

bypassed.  Program  DA250  is  executed  as  the  first  step  of  procedure 
INVPRCOR.  This  procedure  also  executes  the  Inventory  Master  File  Edit/ 
Update  program,  DG300.  The  price  correction  procedure  is  normally  ex- 
ecuted on  a stand-alone  basis. 
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7. 19  INWADJ  - Inventory  Value  Adjustment 


The  Inventory  Value  Adjustment  program  is  designed  to  generate 
transactions  that  will  correct  the  values  of  inventory  items  recorded 
in  the  Inventory  Master  File.  For  each  item  on  file,  two  calculations 
are  made:  the  value  of  the  on-hand  quantity  and  the  theoretical  inven- 

tory value  from  the  Monthly  Activity  (60)  records.  If  the  theoretical 
value  differs  from  the  value  of  the  on-hand  quantity,  a value  adjust- 
ment transaction  is  created  to  correct  the  discrepancy.  These  trans- 
actions are  input  to  the  Inventory  Master  File  Edit/Update  program, 
DG300,  and  are  used  to  update  both  the  Inventory  Master  and  Inventory 
Class  Master  files. 

7.19.1  System  Interfaces 

Figure  7.19-1  is  a program  flowchart.  As  illustrated,  program 
input  consists  of  two  data  sets.  These  data  sets  are: 

(a)  the  Report  Date  File,  S.DATE,  created  through, 
execution  of  IBM  utility  program  lEBGENER,  and 

(b)  the  Inventory  Master  File,  M. INVENT (0),  maintained 
by  the  Inventory  Master  File  Edit/Update  program, 

DG300.  The  version  read  is  the  most  current  version, 
version  zero. 

Program  output  consists  of  a temporary  file  of  value  adjustment 
transactions,  the  Value  Adjustment  Transaction  File,  &VALADJ . This 
file  is  input  to  the  Data  Acceptance  program,  DA300,  for  eventual 
processing  by  the  Inventory  Master  File  Edit/Update  program,  DG300. 
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FIGURE  7.19-1 

INVVADJ  PROGRAM  FLOWCHART 
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7.19.2  Program  Files 


The  program  creates  no  interval  files. 

7.19.3  Processing  Functions 

As  illustrated  in  Figure  7.19-1,  the  Report  Date  File  is  read. 

The  request  card  for  the  program  is  found  and  the  date  stored  in  pro- 
gram working  storage.  This  date  is  used,  as  the  transaction  date  of 
each  value  adjustment  transaction  that  is  generated. 

After  the  date  file  has  been  read,  the  program  reads  the  Inventory 
Master  File.  For  each  inventory  item,  the  following  calculations  are 
performed: 

(a)  the  value  of  the  on-hand  quantity  is  calculated  by 
multiplying  the  on-hand  quantity  by  the  average  unit 
price.  These  values  are  stored  in  the  Stock  Status 
(53)  record;  and 

(b)  the  theoretical  value  of  the  inventory  item  is  calcu- 
lated by  summing  the  monthly  value  of  receipts  and 
adjustments,  and  subtracting  the  monthly  value  of 
issues  from  all  Monthly  Activity  (60)  records  for  the 
item.  In  addition,  the  beginning  on-hand  value  from 
the  Stock  Status  (53)  record  is  added  to  this  resultant 
sum. 


The  program  then  compares  these  two  values.  If  they  are  equal, 
no  additional  processing  is  performed  for  the  item.  Control  is  passed 
to  the  processing  of  the  next  item  on  the  Inventory  Master  File. 

If  the  calculated  values  are  not  equal,  a difference  (DIFF)  value 

* 

is  calculated  as  follows: 

DIFF  = (value  of  on-hand  quantity)  - (value  calculated  from 

monthly  records) 

DIFF  may  be  either  positive  or  negative.  If  it  is  positive,  the  pro- 
gram creates  a standard  Value  Adjustment  (9A)  transaction  for  the  item 
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number.  The  transaction  is  given  the  date  as  input  from  the  Report 
Date  File  and  an  adjustment  value  equal  to  DIFF.  If  the  value  of  DIFF 
is  greater  than  or  equal  to  100,000,  multiple  transactions  are  created, 
the  cumulative  value  of  which  equals  DIFF. 

If  DIFF  is  negative,  the  program  creates  a standard  Value  Adjust- 
ment (9N)  transaction.  The  processing  functions  performed  are  the 
same  as  for  the  9A  transaction. 

When  all  inventory  items  have  been  evaluated,  program  execution 
terminates . 

7.19.4  Error  Messages 

If  a report  request  for  the  Inventory  Value  Adjustment  program 
is  not  found  in  the  Report  Date  File  or  if  a request  is  found  but  is 
invalid,  the  following  message  is  printed: 

'INWADJ  0100  - INVALID  DATE  REQUEST  CARD* 

If  no  transactions  are  generated  by  the  program,  the  following 
message  is  printed: 

'INWADJ  0200  - NO  TRANSACTIONS  CREATED,  RUN  STOPPED' 

In  either  case,  a return  code  of  16  is  issued  that  will  cancel 
execution  of  subsequent  job  steps.  This  procedure  is  followed  be- 
cause successful  execution  of  the  subsequent  steps  depends  on  the  out- 
put generated  by  this  program. 
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7.19.5  Remarks 


Program  INWADJ  is  executed  through  the  use  of  procedure  INWAL. 

The  user  must  also  execute  procedure  INVUOl  to  process  the  adjustment 
transactions  created  by  the  program.  A data  set  override  card  must  be 
included  in  the  deck  to  reference  the  Value  Adjustment  Transaction  File, 
&VALADJ,  as  input  to  the  procedure  INVUOl.  This  adjustment  process  is 
normally  executed  as  a stand-alone  job  on  an  as-required  basis. 
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7.20  INVCADJ  - Inventory  Class  Master  File  Adjustment 


The  Inventory  Class  Master  File  Adjustment  program  is  designed  to 
reconcile  the  inventory  class  values  in  the  Inventory  Class  Master  File 
to  those  reflected  in  the  Inventory  Master  File.  For  each  item  classifi- 
cation on  file,  the  class  value  is  calculated  in  two  ways:  by  summing 

individual  item  values  from  the  Inventory  Class  Master  File  records.  The 
program  creates  an  adjustment  value  that  will  reconcile  the  class  value 
to  the  sxjmmation  of  the  item  values.  A new  version  of  the  Inventory  Class 
Master  File  is  created  that  includes  the  value  adjustment. 

7.20.1  System  Interfaces 

Figure  7.20-1  is  a program  flowchart.  As  illustrated,  program  input 
consists  of  three  data  sets.  These  data  sets  are: 

(a)  the  Report  Date  File,  S.DATE,  created  through  execution  of 
IBM  utility  program  lEBGENER; 

(b)  the  Inventory  Master  File,  M. INVENT (0),  maintained  by  the 
Inventory  Master  File  Edit/Update  program,  DG300.  The 
version  read  is  the  most  current  version,  version  zero; 
and 

(c)  the  Inventory  Class  Master  File,  M. INVCLASS (0) , also  main- 
tained by  program  DG300.  The  version  read  is  the  most  cur- 
rent version,  version  zero. 

Program  output  consists  of  an  updated  version  of  the  Inventory  Class 
Master  File,  M. INVCLASS (+1) . This  version  represents  the  status  of  the 
file  after  the  value  reconciliation  process  has  been  completed. 

7.20.2  Program  Files 

The  program  creates  no  internal  files. 
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FIGURE  7.20-1 

INVCADJ  PROGRAM  FLOWCHART 


7.20.3  Processing  Functions 

As  illustrated  in  Figure  7.20-1,  the  Report  Date  File  is  read  to 
determine  the  report  request  date.  This  date  provides  the  year  and  month 
that  will  be  given  to  the  adjustment. 

The  program  then  reads  the  Inventory  Master  File.  For  each  item 
class,  defined  as  the  first  three  characters  of  the  item  number,  a value 
is  calculated.  The  value  represents  the  sum  of  all  individual  item  values 
that  belong  to  that  class.  An  item  value  is  calculated  as  follows: 
(beginning  on-hand  value  from  the  Stock  Status  (53)  record)  + (monthly 
receipts  - monthly  issues  + monthly  adjustments  from  the  Monthly  Activity 

(60)  records).  The  class  number  and  corresponding  value  are  stored  in 
program  working  storage.  Processing  continues  in  this  way  until  all  items 
have  been  read  from  the  file. 

When  all  items  have  been  processed,  the  program  accesses  the  In- 
ventory Class  Master  File.  For  each  class,  a class  value  is  calculated 
as  follows:  (beginning  on-hand  value  from  the  Stock  Status  (53)  record)  + 

(monthly  receipts  - monthly  issues  + monthly  adjustments  from  the  Monthly 
Activity  (60)  records).  This  value  is  compared  to  the  corresponding 
class  value  calculated  from  the  Inventory  Master  File.  If  the  values  are 
equal,  no  adjustment  is  necessary  and  the  Inventory  Class  Master  File 
records  for  the  class  are  written  to  the  output  file. 

If  the  values  are  not  equal,  an  adjustment  is  calculated:  adjustment 

(ADJ  = class  value  from  Inventory  Master  File  - class  value  from  In- 
ventory Class  Master  File.  ADJ  may  be  positive  or  negative.  It  is  added 
algebraically  to  the  monthly  adjustments  field  of  the  Monthly  Activity  (60) 


7-152 


record  for  the  date  submitted  through  the  Report  Date  File.  If  a 60 
record  does  not  exist  for  the  request  date,  the  adjustment  is  applied  to 

the  most  recent  60  record  for  the  class.  After  the  adjustment  has  been 
made,  the  file  records  for  the  class  are  written  to  the  output  file. 

Program  execution  terminates  when  all  classes  have  been  adjusted. 

7.20.4  Error  Messages 

If  a date  request  is  not  found  for  the  program  in  the  Report  Date 
File,  or  if  a request  is  found  but  the  date  is  invalid,  the  following 
message  is  printed! 

'INVCADJ  0100  - INVALID  DATE  REQUEST  CARD'. 

Program  execution  is  terminated,  and  a return  code  of  16  is  issued  causing 
subsequent  job  steps  to  be  bypassed. 

7.20.5  Remarks 

Program  INVCADJ  is  executed  on  a stand-alone  basis  through  pro- 
cedure INVCLS.  It  is  recommended  that  the  Inventory  Activity  Report 
Generator  program,  RP020  (see  Section  7.13),  be  executed  following  this 
program.  The  report  generated  by  RP020  will  enable  the  user  to  check 
the  corrections  made  to  the  Inventory  Class  Master  File. 
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7.21  INVCOUNT  - Inventory  Master  Card  Generator 


The  Inventory  Master  Card  Generator  program,  INVCOUNT,  is  designed 
to  assist  management  in  the  taking  of  annual  inventory.  For  each  item 
number  on  the  Inventory  Master  File,  at  least  one  data  card  is  punched. 
These  cards  contain  the  item  number  and  name,  the  unit  of  issue,  a date, 
and  the  number  of  the  division  store  where  the  item  is  kept.  The  division 
store  number  comes  from  the  Division  Stock  Status  (49)  file  record.  One 
card  is  generated  for  each  49  record  on  file  as  well  as  the  central  store. 
If  no  49  records  are  on  file,  one  card  is  generated  for  the  item  number 
referencing  the  central  store. 

The  user  then  codes  the  on-hand  quantity  counts  from  the  annual 
inventory  count  into  the  appropriate  card.  These  modified  cards  are 
input  to  the  Inventory  Quantity  Adjustment  program,  INVQTY  (see  Section 

7.22)  and  the  Division  Stock  Reconciliation  program,  INVDIV  (see  Section 

7.23)  . 

7.21.1  System  Interfaces 

Figure  7.21-1  is  a program  flow  chart.  As  illustrated,  program  in- 
put consists  of  two  data  sets  available  from  prior  job  steps.*  These 
data  sets  are: 

(a)  the  Report  Date  File,  CN1744. INV.S.DATE,  created  through 
the  execution  of  the  utility  program  lEBGENER;  and 

(b)  Inventory  Master  File,  CN1744. INV.M. INVENT(  ),  updated  by 
the  Inventory  Master  File  Edit/Update  program,  DG300. 

Program  output  consist  of  the  Inventory  Master  Card  File,  which  is 

utilized  by  the  Inventory  Quantity  Adjustment  program,  INVQTY,  and  by 

the  Division  Stock  Reconciliation  program,  INVDIV. 
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FIGURE  7.21-1 

INVCOUNT  PROGRAM  FLOWCHART 


7.21.2  Program  Files 


The  program  creates  one  internal  file,  the  Inventory  Count  Record 
File,  during  execution.  The  file  is  described  by  file  and  record  speci- 
fications in  Tables  7.21-1  and  7.21-2. 

7.21.3  Processing  Functions 

As  illustrated  in  Figure  7.21-1,  the  Report  Date  File  is  read  and 
the  report  request  record  is  found  for  the  program.  The  date  from  the 
record  is  placed  in  each  inventory  master  card  produced  by  the  program. 

The  user  may  also  specify  a range  of  classes  on  which  processing  is  to 
be  performed.  Normally,  all  item  classes  are  considered.  The  user,  by 
specifying  a high  and  low  class  value,  may  restrict  the  items  processed. 

In  addition,  multiple  date  cards  may  be  submitted  to  specify  various 
class  ranges. 

Next,  the  Inventory  Master  File  is  read.  For  each  item  number  on 
file  for  the  classes  to  be  processed,  at  least  one  inventory  master 
record  is  generated.  Exceptions  to  this  rule  are  direct  charge  and  free 
stores  items  that  are  not  under  inventory  control  and  are  thus  not  considered. 

The  records  generated  for  each  item  depends  on  the  presence  of 
Division  Stock  Status  (49)  records.  If  these  records  are  on  file,  one 
master  record  is  developed  for  each  division  specified  in  a 49  record. 

Also,  a record  is  generated  referencing  the  central  store.  If  no  49 
records  are  on  file  for  the  item,  one  record,  referencing  the  central 
store,  is  generated.  There  is  one  exception  to  this  rule:  If  a 49  record 

is  on  file  with  a nominal  division  stock  level  of  99,  only  one  record 
is  generated  which  references  this  division  store.  This  is  done  because 
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TABLE  7.21-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME;  Inventory  Count  Record  File 
DATA  SET  NAME;  &OSORT 

NUMBER  OF  FORMATS;  1 RECORD  SIZE; 

FILE  ORGANIZATION;  Sequenced  by:  Division  Number 

Item  Number 


RECORD  FORMATS: 

RECORD  NAME  MAX.  NO. 

Inventory  Count  Record  U 


80  Characters 


MIN.  NO. 
0 
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TABLE  7.21-2 


RECORD  SPECIFICATION 


FIELD  NAME;  Inventory  Count  Record 
FILE  NAME;  Inventory  Count  Record  File 
COBOL  NAME  OF  RECORD;  REPORT-REC 
RECORD  LENGTH;  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

1 

X 

FILLER 

2 

6 

9(6) 

R-REPORT-DATE 

Record  Date 

8 

1 

X 

FILLER 

9 

11 

x(ll) 

R-INV-PART-NBR 

Item  Number 

20 

1 

X 

FILLER 

21 

15 

X(15) 

R- ITEM-NAME 

Item  Name 

36 

1 

X 

FILLER 

37 

2 

XX 

R-ISS-UNIT-MSRE 

Unit  of  Issue 

39 

17 

X(17) 

FILLER 

56 

5 

X(5) 

R-QTY-ENTRY 

'QTY  =' 

61 

13 

X(13) 

FILLER 

74 

2 

XX 

R-DIV 

Division  Number 

76 

1 

X 

FILLER 

77 

4 

X(4) 

R-SEQ-NO 

Record  Sequence  Number 

TOTAL 

80 
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the  stock  level  of  99  signifies  that  the  item  is  stored  only  at  that 
division. 

The  records  generated  consist  of  the  item  number  and  name,  the  unit 
of  issue,  the  date  as  input  through  the  Report  Date  File,  and  the  division 
store  number.  The  central  division  is  denoted  by  spaces.  The  records 
are  released  to  the  COBOL  internal  sort  routine  where  they  are  sorted 
by  division  code  and  item  nvimber. 

The  program  then  reads  the  file  of  sorted  inventory  master  records. 
One  punched  card  is  created  per  record.  Before  punching,  a sequence 
number  is  attached  (columns  77-80  of  the  output  card)  that  orders  the 
cards  within  each  division  code. 

When  all  sorted  records  have  been  processed,  program  execution 
terminates . 


7.21.4  Error  Messages 

If  an  error  is  detected,  an  indicative  message  is  printed.  The 
messages  are; 

(a)  'INVCOU— NO  RECORDS  FOUND  FOR  REQUESTED  CLASS  RANGE' 

This  message  is  printed  if  no  records  were  found  for 
the  class  range  specified  in  the  date  request  card. 
Program  execution  is  not  terminated.  An  attempt  is 
made  to  process  additional  request  cards. 

(b)  'INVCOU — 300  INVALID  RECORD  FOUND  IN  DATE  FILE' 

This  message  is  printed  if  the  Report  Date  File 
contains  a non-numeric  request  date  for  the  pro- 
gram. Program  execution  is  not  terminated  when 
this  is  detected. 
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(c)  'INVCOU— 0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE' 

This  message  is  printed  if  the  program  was  executed 
without  a valid  date  card.  Program  execution  is 
terminated  when  this  is  detected. 

(d)  ' INVCOU— CLASS  CODE  OUT  OF  SEQUENCE,  REQUEST  BYPASSED' 

This  message  is  printed  if  a date  request  has  a low 
class  code  whose  value  is  less  than  the  previous  high 
class  code  processed.  The  record  is  bypassed. 

7.21.5  Remarks 

The  user,  by  submitting  multiple  date  cards,  may  choose  selected 
classes  and  ranges  of  classes  for  processing.  If  multiple  cards  are 
used,  they  must  be  in  increasing  sequence  by  class  code.  Those  found 
to  be  out  of  sequence,  and  those  otherwise  in  error,  are  ignored  by  the 
program.  An  indicative  error  message  is  printed  signaling  this  occurance. 

Program  INVCOUNT  is  normally  run  as  a stand-alone  job. 
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7.22  INVQTY  - Inventory  Quantity  Adjustment 


The  Inventory  Quantity  Adjustment  program,  INVQTY,  is  a special 
purpose  program,  designed  to  assist  management  in  the  performance  of  the 
annual  inventory  count.  The  program  generates  a file  of  quantity  adjust- 
ment (2A,  3A)  standard  inventory  transactions  that  will  reconcile  the 
on-hand  quantity  values  from  the  Inventory  Master  File  to  the  count  data 
from  the  physical  count  procedure.  These  transactions  are  input  to  the 
Data  Acceptance  program,  DA300,  for  eventual  processing  by  the  Inventory 
Master  File  Edit/Update  program,  DG300. 

The  source  of  the  manual  count  data  is  the  Quantity  Adjustment  Card 
File.  This  is  a deck  of  punched  cards  into  which  the  various  item  counts 
have  been  coded.  Normally,  this  reconciliation  procedure  is  run  against 
all  items  on  file.  Optionally,  the  user  may  select  individual  classes 
or  ranges  of  classes  for  processing. 

7.22.1  System  Interfaces 

Figure  7.22-1  is  a program  flowchart.  As  illustrated,  program  in- 
put consists  of  three  data  sets.  These  are: 

(a)  the  Report  Date  File,  CN1744. INV. S . DATE,  created  through 
the  execution  of  utility  program  lEBGENER; 

(b)  the  Inventory  Master  File,  CN1744. INV. M. INVENT,  updated 

by  the  Inventory  Master  File  Edit/Update  program  DG300;  and 

(c)  the  Quantity  Adjustment  Card  File,  ADJCD,  created  by  the 
Inventory  Master  Card  Generator  program,  INVCOUNT,  and 
modified  by  the  user  to  include  inventory  count  data. 
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FIGURE  7.22-1 

INVQTY  PROGRAM  FLOWCHART 
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Program  output  consists  of  the  Quantity  Adjustment  Transaction 
File,  &QTYADJ.  This  file  is  a temporary  disk  file  that  is  read  by  the 
Data  Acceptance  program,  DA300. 

7.22.2  Program  Files 

During  execution,  the  program  creates  one  internal  file,  the  In- 
ventory Adjustment  Record  File.  This  file  is  described  in  file  and 
record  specifications  in  Table  7.22-1. 

7.22.3  Processing  Functions 

As  illustrated  in  Figure  7.22-1,  the  Report  Date  File  is  read,  and 

the  program  request  cards  are  found.  The  user  may  submit  one  or  more 

request  cards.  Multiple  request  cards  are  accepted  to  permit  the  user 
to  select  multiple  class  ranges  for  processing.  If  one  card  is  found 
without  the  class  selection  option  coded,  all  classes  on  the  Inventory 
Master  File  are  considered.  This  is  the  normal  method  of  operation. 

The  program  then  reads  the  Quantity  Adjustment  Card  File.  This  is 
a deck  of  punched  cards  that  contains  the  inventory  count  for  the  items 
to  be  processed.  The  cards  are  released  to  the  COBOL  internal  sort  routine 
for  sequencing  by  item  number  and  division  code. 

The  program  reads  the  sorted  count  data  and  performs  a number  of 
edit  checks.  Those  found  to  be  in  error  are  displayed  on  the  Inventory 

Quantity  Edit  List.  If  an  error  is  found  in  any  one  card  for  an  item 

number,  all  cards  for  the  item  are  rejected.  The  edit  criteria  are: 

(a)  the  date  in  the  count  card  must  be  the  same  as  the 
date  in  the  report  request  record  from  the  Report 
Date  File; 
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TABLE  7.22-1 


PROGRAM  FILE  SPECIFICATION 

FILE  NAME;  Inventory  Adjustment  Record  File 
DATA  SET  NAME;  &OSORT 

NUMBER  OF  FORMATS;  1 RECORD  SIZE;  80  Characters 

FILE  ORGANIZATION;  Sequenced  by:  Item  Number 

Division  Store 

RECORD  FORMATS; 

RECORD  NAME  MAX.  NO.  MIN.  NO. 

Inventory  Adjustment  Record  U 0 


Note;  Record  Formats  and  Specifications  are  the  same  as  for  the 
Quantity  Adjustment  Card  File,  ADJCD  (see  Section  6.23). 
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(b)  the  count  cards  must  be  for  an  item  whose  class  code 
has  been  selected  for  processing; 

(c)  count  cards  must  be  submitted  for  each  item,  within 
the  selected  class,  on  the  Inventory  Master  File;  and 

(d)  count  cards  must  be  present  for  the  central  storeroom 
and  for  each  division  specified  in  Division  Stock 
Status  (49)  file  records.  If  an  item  has  a 49  record 
with  a division  stock  level  of  99,  only  one  card  is 
present  referencing  that  division. 

If  the  count  cards  for  an  item  are  acceptable  according  to  the 
edit  criteria,  the  count  data  from  the  multiple  cards  are  summed,  yielding 
an  aggregate  on-hand  quantity.  This  value  is  compared  to  the  on-hand 
quantity  in  the  Stock  Status  (53)  record  of  the  Inventory  Master  File. 

An  adjustment  is  calculated  as  follows: 

ADJ  = physical  count  - file  value. 

If  ADJ  equals  zero,  no  further  processing  is  done  on  this  item  number. 
Otherwise,  ADJ  may  be  a positive  or  a negative  quantity.  If  ADJ  is 
positive,  the  program  generates  a standard  inventory  Quantity  Adjust- 
ment (2A)  transaction.  The  transaction  is  given  the  date  as  specified 
in  the  Report  Date  File  for  the  item  class.  If  ADJ  is  negative,  a 3A 
transaction  is  created.  The  generated  transaction  is  output  to  the 
Quantity  Adjustment  Transaction  File,  &QTYADJ. 

When  all  input  count  cards  have  been  processed,  program  execution 
terminates . 

7.22.4  Error  Messages 

If  an  error  is  detected,  an  indicative  error  message  is  printed. 
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The  messages  are: 


(a)  INVQTY-0300  INVALID  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  the  date  card  contained 
a non-numeric  date.  Program  execution  is  not  ter- 
minated when  this  is  detected. 

(b)  INVQTY-0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  the  program  was  executed 
without  a valid  date  card.  Program  execution  is 
terminated  when  this  is  detected. 

(c)  INVQTY-CLASS  CODE  OUT  OF  SEQUENCE,  REQUEST  BY  PASSED 

This  message  is  printed  if  a date  card  has  a beginning 
class  code  lower  than  the  previous  high  class  code 
processed.  Program  execution  is  not  terminated  when 
this  is  detected. 

7.22.5  Remarks 


The  user  may  request  multiple  class  ranges  for  processing  by  sub- 
mitting multiple  request  cards  to  the  Report  Date  File.  These  must  be 
in  increasing  sequence  by  class  code.  Those  out  of  sequence  are  ignored. 

Program  INVQTY  is  normally  run  as  a special  job.  Procedure  INVUOl 
must  be  executed  after  this  program  to  process  the  generated  adjustment 
transactions.  This  procedure  uses  the  transactions  to  update  the  In- 
ventory Master  File.  A data  definition  override  card  must  be  included 
in  the  deck  to  reference  the  Quantity  Adjustment  Transaction  File  as 
input  to  the  procedure  INVUOl. 
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7.23  INVDIV  - Division  Stock  Reconciliation 


The  Division  Stock  Reconciliation  program,  INVDIV,  is  designed  to 
assist  management  in  taking  the  annual  inventory  count.  It  is  a special 
purpose  program,  executed  in  conjunction  with  the  Inventory  Master  Card 
Generator  program,  INVCOUNT,  which  produces  a report  that  will  assist  in 
analyzing  the  distribution  of  inventory  stock  within  the  property. 

The  report  produced  is  the  Inventory  of  Division  Stock  report. 
Figure  7.23-1  is  a format  of  this  report.  The  data  displayed  on  the 
report  consists  of  the  physical  count  data  recorded  for  each  item 
number  at  each  division  store.  The  division  store  numbers  are  those 
found  in  the  Division  Stock  Status  (49)  records  of  the  Inventory  Master 
File.  For  each  store  identification,  except  for  the  central  store,  a 
separate  report  is  generated.  A print  line  is  generated  for  each  item 
kept  at  the  store.  The  line  consists  of  the  item  number,  item  name, 
unit  of  issue,  nominal  stock  level,  physical  on-hand  quantity  count,  and 
an  adjustment  factor  defined  as  the  difference  between  the  count  and  the 
stock  level. 

Normally,  the  program  is  executed  for  all  items  on  the  Inventory 
Master  File.  Optionally,  particular  item  classes  or  ranges  of  classes 
may  be  selected  for  processing.  Direct  charge  and  free  stores  items 
are  not  considered. 

7.23-1  System  Interfaces 

Figure  7.23-2  is  a program  flowchart.  Program  input  consists  of 
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FIGURE  7.23-1 

FORMAT  OF  INVENTORY  OF  DIVISION  STOCK  REPORT 
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three  data  sets.  These  are: 

(a)  the  Report  Date  File,  CN1744. INV. S.DATE,  created  through 
execution  of  IBM  utility  program  lEBGENER; 

(b)  the  Inventory  Master  File,  CN1744. INV. M. INVENT,  main- 
tained by  the  Inventory  Master  File  Edit/Update  program, 

DG300;  and 

(c)  the  Division  Stock  Reconciliation  Card  File,  DIVCD, 
generated  by  the  Inventory  Master  Card  Generator 
program,  INVCOUNT,  and  modified  by  the  user  to 
include  inventory  count  data. 

Program  output  consists  of  one  print  file  that  does  not  interface 
with  any  other  program. 

7.23.2  Program  Files 

The  program  creates  two  internal  files  during  execution.  These  are: 

(a)  the  Division  Stock  Card  Sort  File,  &OSORT,  used  to  sort 
the  input  Division  Stock  Reconciliation  Card  File,  DIVCD. 

This  file  is  defined  in  File  and  Record  Specifications  in 
Table  7.23-1;  and 

(b)  the  Division  Report  Extract  File,  &REPORT,  used  to  sort 
records  containing  the  data  for  the  report.  This  file 
is  defined  in  File  and  Record  Specifications  in  Tables 
7.23-2  and  7.23-3. 

7.23.3  Processing  Functions 

As  illustrated  in  Figure  7.23-2,  the  Report  Date  File  is  read,  and 
the  date  request  records  for  the  program  are  found.  The  user  may  submit 
one  or  more  request  record.  If  one  is  input  with  no  specification  of  a 
class  range,  all  items  on  the  Inventory  Master  File  are  considered.  Al- 
ternatively, the  user  may  specify  selected  ranges  of  classes  by  coding 
the  class  selection  field.  Furthermore,  dates  specified  must  be  the  same 
as  those  on  the  Division  Stock  Reconciliation  Card  File  for  the  item  class. 
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TABLE  7.23-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME;  Division  Stock  Card  Sort  File 
DATA  SET  NAME;  &OSORT 

NUMBER  OF  FORMATS;  1 RECORD  SIZE;  80  Characters 

FILE  ORGAI'J  IZ  AT  ION ; Sequenced  by:  Item  Number 

RECORD  NAME  MAX.  NO.  MIN.  NO. 

Division  Card  Sort  Record  U 0 

Record 


Note:  The  record  formats  and  specifications  are  the  dame  as  for 

the  Division  Stock  Reconciliation  Card  File,  DIVCD  (see 
Section  6.24). 
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TABLE  7.23-2 


PROGRAM  FILE  SPECIFICATION 
FILE  NAME;  Division  Report  Extract  File 
DATA  SET  NAME:  &REPORT 

NUMBER  OF  FORMATS;  1 RECORD  SIZE;  47 

FILE  ORGANIZATION;  Sequenced  by:  Division  Number 

Item  Number 

RECORD  NAME  MAX.  NO. 

Extract  Record  U 


Characters 

MIN.  NO. 

0 
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TABLE  7.23-3 


RECORD  SPECIFICATION 


RECORD  NAME;  Extract  Record 


FILE  NAME;  Division  Report  Extract  File 
COBOL  NAME  OF  RECORD:  REPORT-RECORD 

RECORD  LENGTH;  47  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

REP -D IV 

Division  Number 

3 

11 

X(ll) 

REP - INV-P ART -N BR 

Item  Number 

14 

15 

X(15) 

REP-ITEM-NAME 

Item  Name 

29 

2 

XX 

REP-ISS-UNIT 

Unit  of  Issue 

31 

5 

9(5) 

REP-ST-LEVEL 

Division  Stock  Level 

36 

5 

9(5) 

REP-OH-QTY 

On-Hand  Quantity 

41 

2 

XX 

REP-AST 

Division  99  Indicator 

43 

5 

S9(5) 

REP-ADJ-QTY 

Adjustment  Quantity 

TOTAL  47 
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The  Division  Stock  Reconciliation  Card  File  is  then  sorted  on  item 


number.  This  process  will  sequence  the  file  for  comparison  to  the  In- 
ventory Master  File. 

The  records  in  the  sorted  file  contain  count  data  for  each  division 
at  which  an  item  is  stored.  The  records  are  edited  against  the  Inventory 
Master  File  as  follows: 

(a)  if  the  user  has  selected  specific  item  classes  for  pro- 
cessing, and  records  are  found  for  a class  not  selected, 
an  error  occurs; 

(b)  if  there  are  no  count  records  for  an  item  on  file 
that  is  to  be  processed,  an  error  occurs; 

(c)  if  the  user  fails  to  submit  a count  card  for  a 
division  at  which  the  item  is  stored,  an  error 
occurs.  These  various  division  numbers  are 
found  in  the  Division  Stock  Status  (49)  records; 
and 

(d)  the  count  quantity  on  the  input  records  must  be 
numeric  or  an  error  results. 

Those  count  records  that  are  in  error  are  displayed  on  the  Division 
Inventory  Quantity  Edit  List  report.  If  one  record  is  in  error  for  an 
item  number,  all  records  for  the  item  are  rejected. 

If  the  records  for  the  item  are  valid,  an  extract  record  is  created 
for  each  Division  Stock  Status  (49)  record  on  file.  If  no  49  records 
are  found,  the  item  is  assumed  to  be  kept  only  at  the  central  storeroom 
and  no  further  processing  is  done.  The  extract  record  consists  of:  the 

division  code  and  nominal  stock  level  from  the  49  record,  the  item 
number,  the  item  name,  the  unit  of  issue,  the  on-hand  quantity  count 
data,  a special  indicator,  and  an  adjustment  quantity.  The  special 
indicator  is  included  if  a division  stock  level  of  99  is  found. 
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This  value  indicates  that  the  item  is  stored  only  at  that  division. 

The  adjustment  quantity  is  defined  as  the  difference  between  the  count 
data  and  the  nominal  stock  level.  The  data  in  the  extract  record  is  that 
which  is  necessary  for  production  of  the  report.  The  records  are  released 
to  the  COBOL  internal  sort  routine  for  sequencing  on  division  code  and 
item  number.  When  all  items  within  the  requested  class  ranges  have  been 
processed,  the  program  report  is  generated. 

The  Inventory  of  Division  Stock  report  is  organized  on  division  code. 
For  each  item  stored  at  the  division,  one  print  line  is  generated  dis- 
playing the  data  from  the  extract  record.  For  those  items  with  the  special 
indicator  switch  set,  an  asterisk  is  placed  on  the  report  next  to  the 
division  stock  level,  and  no  adjustment  quantity  is  printed.  This  is  to 
call  attention  to  those  items  stored  only  at  the  division. 

When  all  extract  records  have  been  printed,  program  execution  ter- 
minates. 

7.23.4  Error  Messages 

If  an  error  is  detected,  an  indicative  error  message  is  printed.  The 
messages  are: 

(a)  INVDIV— 0300  INVALID  RECORD  FOUND  IN  DATE  FILE 

This  message  is  printed  if  a report  request  record  from 
the  Report  Date  File  was  found  to  have  a non-numeric  date. 

Program  execution  is  not  terminated  when  this  is  detected. 


7-175 


(b)  'INVDIV— 0310  NO  DATE  RECORD  FOUND  IN  DATE  FILE' 

This  message  is  printed  if  the  program  was  executed 
without  a valid  date  card.  Program  execution  is 
terminated  when  this  is  detected. 

(c)  'INVDIV— CLASS  CODE  OUT  OF  SEQUENCE  REQUEST  BYPASSED' 

This  message  is  printed  if  a Date  Card  has  a beginning 
class  code  lower  than  the  previous  high  class  code. 

Program  execution  is  not  terminated  when  this  occurs. 

7.23.5  Remarks 

The  program  can  process  multiple  report  request  records  specifying 
class  ranges.  These  records  must  be  in  increasing  order  by  class  code. 
Those  out  of  sequence  are  not  processed. 

The  Division  Stock  Reconciliation  program  is  normally  run  as  a 
stand-alone  job. 
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7.24  VENDOl  - Vendor  Reference  File  Startup 


The  Vendor  Reference  File  Startup  program  is  designed  as  a special 
purpose  program  to  be  run  at  the  time  that  the  Inventory  System  is  in- 
stalled. The  program  reads  a card  deck  of  vendor  numbers  and  names, 
edits  and  sorts  the  cards,  and  uses  their  contents  to  initialize  the 
Vendor  Reference  File.  This  file  is  an  indexed  sequential  (ISAM)  file. 
The  space  for  this  file  must  have  been  previously  allocated  using  IBM 
utility  IEFBR14. 

7.24.1  System  Interfaces 

Figure  7.24-1  is  a program  flowchart.  As  illustrated  program 
input  consists  of  the  Vendor  Reference  File  Startup  Card  File  (see 
Section  6.27).  This  is  a user-supplied  set  of  card  records  specifying 
the  vendors  to  be  initialized  on  the  file. 

Program  output  consists  of  the  Vendor  Reference  File,  M. VENDOR  (see 
Section  6.13).  The  space  for  the  file  must  already  have  been  allocated 
via  IBM  utility  program  IEFBR14.  This  file  is  read  by  various  Inventory 
system  report  generators,  and  is  maintained  by  the  Data  Acceptance 
program,  DA300. 

7.24.2  Program  Files 

During  program  execution,  one  internal  file  is  created  by  the 
program.  This  file,  the  Sorted  Vendor  File,  is  described  in  file  and 
record  specification  sheets  in  Tables  7.24-1  and  7.24-2. 
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FIGURE  7.24-1 

VEND01  PROGRAM  FLOWCHART 
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TABLE  7.24-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME;  Sorted  Vendor  File 
DATA  SET  NAME;  &OSORT 
NUMBER  OF  RECORD  FORMATS;  1 
FILE  ORGANIZATION:  Sequenced  by: 

RECORD  FORMATS: 

FORMAT 

CODE  RECORD  NAME 

Vendor  Startup  Record 


RECORD  SIZE:  51  Characters 


Vendor  Code 


MAX.  NO.  MIN.  NO 
U 1 


7-179 


TABLE  7.24-2 


RECORD  SPECIFICATION 

RECORD  NAME;  Vendor  Startup  Record 
FILE  NAME;  Sorted  Vendor  File 
COBOL  NAME  OF  RECORD;  I-SORT-REC 
RECORD  FORMAT  CODE;  None 
RECORD  LENGTH:  51  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD 

1 

5 

9(5) 

I-SORT-SEQ 

6 

6 

9(6) 

I- SORT-DATE 

12 

40 

X(40) 

I-SORT-NAME 

TOTAL 

51 

FIELD  DESCRIPTION 

Vendor  Code 
Startup  Date  (MMDDYY) 
Vendor  Name 
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7.24.3  Processing  Functions 


As  illustrated  in  Figure  7.24-1,  the  vendor  file  start-up  cards 
are  read.  Each  card  is  edited  against  a set  of  edit  criteria.  These 
criteria  are: 

(a)  vendor  number  must  be  numeric, 

(b)  vendor  start-up  date  must  be  numeric,  and 

(c)  vendor  name  must  not  be  all  spaces. 

If  the  card  is  in  error,  it  is  rejected  and  displayed  on  the  Vendor  File 
Edit  List  report  with  an  asterisk  under  each  field  in  error.  If  the 
card  is  valid,  a transaction  is  created  and  released  to  the  COBOL  internal 
sort  routine.  These  transactions  consist  of  the  vendor  code,  the  date, 
and  the  vendor  name. 

When  all  start-up  cards  have  been  processed,  the  program  reads 
the  Sorted  Vendor  File  that  has  been  arranged  in  increasing  sequence 
by  vendor  code  by  the  sort  routine.  For  each  record  on  this  file, 
a corresponding  record  is  created  that  is  compatible  with  indexed 
sequential  (ISAM)  record  format  requirements.  The  created  transaction 
is  then  written  to  the  Vendor  Reference  File  using  standard  ISAM  file 
I/O  procedures. 

Program  execution  is  terminated  when  all  records  from  the  Sorted 
Vendor  File  have  been  processed. 

7.24.4  Error  Messages 

The  program  generates  no  error  message. 


7-181 


7.24.5  Remarks 


Program  VENDOl  is  only  executed  once.  It  is  used  for  the  special 
purpose  of  initiating  the  Vendor  Reference  File.  After  this  run,  all 
updates  to  the  Vendor  Reference  File  are  accomplished  by  using  standard 
inventory  transactions  (CA,  CX) . It  is  recommended  that  the  user  input 
as  many  vendor  cards  as  possible  to  this  program.  However,  the  inclusion 
of  one  valid  start-up  card  is  sufficient  to  properly  initialize  the  file. 

The  Vendor  Reference  File  is  accessed  by  report  generators  to  find 
vendor  names.  As  names  are  added,  changed,  or  deleted,  the  file  access 
time  increases.  Thus,  on  a regular  basis,  the  file  should  be  reorganized. 
This  is  accomplished  by  copying  the  Vendor  Reference  File  to  a temporary 
file,  and  then  copying  the  resultant  file  back  to  the  Vendor  Reference 
File.  This  operation,  accomplished  through  IBM  utility  lEBISAM,  re- 
organizes the  file  and  eliminates  unnecessary  records.  The  frequency  of 
execution  of  this  reorganization  depends  upon  the  number  of  changes 
made  to  the  file  over  time. 
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7. 25  lEBGENER  - Data  Set  Copy  Utility 


The  IBM  utility  program,  lEBGENER,  is  employed  in  the  SIMS  In- 
ventory System  as  a data  set  copy  routine.  It  is  used  to  copy  the  user- 
supplied  request  date  cards,  data  set  DATECD,  to  the  Report  Date  File, 
CN1744. INV. S.DATE.  The  Report  Date  File  is  read  by  the  various  system 
programs,  and  provides  dates  for  the  report  generators.  The  80-character 
card  input  is  compressed  to  a 60-character  record  when  copied  to  the 
Report  Date  File.  The  utility  requires  editing  control  records  to  ac- 
complish this  compression.  The  control  records  are  read  from  the  Inventory 
Control  File,  CN1744. INV. S.CTL,  by  accessing  member  INVDTEOl. 

Figure  7.25-1  is  a flowchart,  which  describes  the  use  of  lEBGENER 
by  the  Inventory  system. 
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FIGURE  7.25-1 

lEBGENER  PROGRAM  FLOWCHART 
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7.26  lEHDASDR  - Disk  Save  Utility 


The  IBM  utility  program  lEHDASDR  is  used  to  dump  the  contents 
of  the  Inventory  System  disk  ACTINV  to  magnetic  tape.  This  procedure 
is  performed  to  facilitate  recovery  in  the  event  of  a system  problem. 

lEHDASDR  requires  program  control  records  to  designate  the  function 
to  be  performed.  These  control  records  are  read  from  the  member 
CTLBKUP  of  the  Inventory  Control  File,  CN1744.INV.S.CTL. 

The  disk  save  procedure  has  been  implemented  for  DTS  at  the 
municipal  computer  center.  At  Optimum  Systems,  Inc.,  Santa  Clara, 
California,  where  the  system  is  run  for  ACTD,  the  backup  procedure 
for  customer  private  disk  packs  is  a standard  operating  procedure 
of  the  service  bureau. 

Figure  7.26-1  is  a program  flowchart  of  lEHDASDR  as  used  at  Dallas. 
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FIGURE  7.26-1 

lEHDASDR  PROGRAM  FLOWCHART 
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7.27  lEBISAM  - ISAM  File  List  Utility 


The  ISAM  File  List  Utility  program  is  a standard  IBM  utility  pro- 
gram designed  to  access  an  indexed  sequential  (ISAM)  file,  and  print 
the  records  contained  in  it.  This  program  is  used  to  print  the  results 
of  the  Vendor  Reference  File  initialization  process.  It  is  executed 
immediately  following  the  Vendor  Reference  File  Startup  program,  VENDOl, 
which  reads  user-supplied  input  data  and  initiates  the  Vendor  Reference 
File,  M. VENDOR  (see  Section  6.13).  The  execution  of  programs  VENDOl  and 
lEBISAM  is  accomplished  using  the  Inventory  procedure  INVEND.  Figure 
7.27-1  is  a program  flowchart  of  the  use  of  lEBISAM  by  the  Inventory 
System. 
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FIGURE  7.27-1 

lEBISAM  PROGRAM  FLOWCHART 
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8.0  SIMS  INVENTORY  SYSTEM  INSTALLATION 


Installation  of  the  SIMS  Inventory  System  involves: 

(a)  preparation  of  the  data  base, 

(b)  initialization  of  system  files  and  program 
libraries  and  entry  of  the  data  base  infor- 
mation, and 

(c)  generation  and  analysis  of  reports  to  verify 
that  data  base  information  has  been  entered 
correctly. 

8. 1  Data  Base  Preparation 

Information  required  for  system  start-up  consists  of: 

(a)  system  constants, 

(b)  vendor  identification  data,  and 

(c)  inventory  and  purchasing  data. 

8.1.1  System  Constants 

The  design  of  the  Inventory  System  provides  for  an  Inventory 
Constants  File,  described  in  Section  6.11.  This  file  consists  of  a 
single  record  containing  report  generation  control  constants  and  file 
record  purge  factors. 

Entry  of  the  system  constants  is  mandatory.  The  user  must  pre- 
pare an  Inventory  System  Constants  (FA)  transaction.  The  input  format 
of  this  transaction  is  described  in  Section  4.2.1.  The  values  entered 
in  the  transaction  are  specific  to  the  property.  If  values  are  not 
coded,  default  values  are  used  when  the  transaction  is  processed.  The 
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system  constants  and  their  default  values  are: 


System  Constant 


Default  Value 


Reorder  Notice  interval 

Unfilled  Purchase  Order  interval 

Low  usage  interval 

Sales  tax  factor 

Number  of  vehicles 

Direct  charge  item  purge  factor 

Purchase  Order  purge  factor 


30  days 
365  days 
365  days 
1.0000 
100 

17  months 
17  months 


The  value  of  each  purge  factor  entered  by  the  user  must  be  with- 
in a certain  range  of  values,  specified  in  the  Data  Acceptance  program, 
DA300.  These  limits  are: 


Months 

Direct  charge  item  purge  factor  17-36 

Purchase  Order  purge  factor  17-60 

8.1.2  Vendor  Identification  Data 

The  design  of  the  Inventory  System  also  provides  for  the  Vendor 
Reference  File,  described  in  Section  6.13.  This  is  an  Indexed  Sequential 
(ISAM)  file,  designed  to  contain  records  of  the  vendors  from  whom 
the  property  purchases  materials,  supplies,  and  services.  Each  record 
contains  a user-specified  five-digit  vendor  code  and  the  name  of  a vendor. 


Purchasing,  receipt,  and  vendor  return  transaction  formats  include  a 
vendor  code,  but  not  the  vendor  name.  Reports  of  purchasing  activities 


are  designed  to  display  both  the  vendor  codes  and  names.  The  report 
generator  programs  access  the  Vendor  Reference  File  using  the  vendor 
code  as  the  key.  Unless  the  user  enters  the  vendor  reference  data, 
vendor  names  cannot  be  displayed  on  the  reports.  Entry  of  vendor  data 
is,  therefore,  mandatory. 
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Procedures  for  the  preparation  of  vendor  reference  data  are: 

(a)  a five-digit  code  number  is  assigned  to  each  vendor; 

(b)  the  length  of  the  associated  vendor  name  is  checked. 

It  must  not  exceed  40  characters;  and 

(c)  an  input  card  is  prepared  for  each  vendor.  The  card 
must  be  punched  in  the  format  described  in  Section 
4.2.7.  The  format  of  the  Vendor  Name  record,  described 
in  Section  4.2.2,  must  not  be  used. 

The  card  file  is  input  to  the  Vendor  File  Start-up  program, 

VENDOl  (see  Section  7.24).  This  is  a special-purpose  program  executed 
to  initialize  the  Vendor  Reference  File.  After  the  file  has  been 
initialized,  file  updating  is  accomplished  through  the  entry  of  standard 
Vendor  Name  (CA,  CX)  transactions  (see  Section  4.2.2). 

8.1.3  Inventory  and  Purchasing  Data 

Generally,  the  SIMS  Inventory  System  is  installed  at  a transit 
property  that  is  a "going  concern"  and  has  a system  to  maintain  inventory 
and  purchasing  records.  Within  this  system,  the  individual  materials 
under  inventory  control  are  identified  by  stock  numbers.  These  numbers, 
frequently  referred  to  as  house  inventory  numbers,  are  user-specific. 

This  obviates  the  need  to  use  more  than  one  manufacturer's  catalog  number 
to  identify  the  records  for  a given  material. 

The  house  inventory  numbering  system  in  use  in  the  SIMS  Inventory 
System  is  based  on  the  General  Motors  Corporation  numbering  scheme. 

The  GMC  system  identifies  automotive  parts  by: 

(a)  a two-digit  class  code — this  code  associates  the  part 

with  the  subsystem  of  the  coach  to  which  the  part  belongs; 
and 
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(b)  a six-digit  number  that  uniquely  identifies  the  part. 

This  numbering  scheme  has  been  extended  in  the  SIMS  Inventory  System 
to  include  house  inventory  numbers  for  materials  other  than  automotive 
parts . 

Similarly,  the  length  of  the  stock  number  has  been  extended  to 
11  characters  to  permit  the  inclusion  of  additional  identifying  parameters 
in  the  stock  number  itself.  The  SIMS  house  number  has  the  following 
format: 


xxx~xxxp(x-x-x 


I Additional  identities 

Item  number 

Inventory  class  code 

The  first  two  digits  of  the  inventory  class  code  are  used  to 
identify  the  class  itself  as  in  the  GMC  numbering  scheme.  The  use  of 
the  third  character  is  optional.  It  may  be  used  to  associate  the 
material  with  its  end  use — e.g.,  a particular  series  of  coaches.  The 
item  number  does  not  necessarily  have  to  include  all  six  digits.  The 
additional  identities  are  optional  and  may  be  used  to  include  in  the 
house  inventory  number  any  parameter  of  significance  to  the  user.  The 
numbering  scheme  adopted  by  the  system  user  should  be  designed  to  fit 
the  needs  of  the  specific  property.  All  11  characters  do  not  have  to  be 
used.  For  example,  ACTD  uses  the  GMC  numbering  scheme — i.e.,  the  first 
two  character  positions  are  used  to  identify  the  inventory  class  and  the 
fourth  through  the  ninth  character  positions  are  used  to  identify  the 
item.  DTS,  on  the  other  hand,  uses  the  first  seven  character  positions, 
of  which  the  last  four  are  used  to  identify  an  item  within  a class.  The 
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only  requirements  of  the  SIMS  Inventory  System  is  that  the  inventory 
class  be  identified  and  the  individual  item  be  identified  because  the 
house  inventory  number  scheme  is  the  key  to  the  maintenance  of  the  inven- 
tory and  purchasing  records. 

To  implement  the  SIMS  Inventory  System,  the  user  prepares  regular 
transactions,  described  in  Section  4.1,  to  transfer  the  existing  infor- 
mation to  the  Inventory  Master  File. 

A minimum  of  three  transactions  are  required  for  each  inventory 
item.  They  are: 

(a)  Item  Characteristics  (AA)  transaction  (see  Section  4.1.1). 

This  transaction  creates  the  basic  file  records  and  iden- 
tifies the  item  to  the  system  in  terms  of  a user-specific 
stock  number,  a name,  a unit  of  issue,  and  the  reorder  point. 
This  transaction  is  also  used  to  enter  a sales  tax  factor 

if  the  tax  rate  applicable  to  the  item  is  different  from 
the  rate  generally  applied  to  purchases — that  is,  the 
rate  defined  by  means  of  the  sales  tax  factor  entered  in 
the  Inventory  Constants  File. 

(b)  Average  Price  Change  (EA)  transaction  (see  Section  4.1.10). 

The  SIMS  Inventory  System  is  designed  to  use  the  weighted 
average  method  of  costing  materials  and  inventory  valuation. 

If  the  property  currently  uses  another  method — e.g.,  FIFO — 
the  average  prices  will  have  to  be  developed  before  preparing 
this  transaction.  The  price  change  transaction  is  used  to 
enter  this  information  as  its  effect  on  the  file  is  to  re- 
place the  initial  value  of  zero  generated  when  the  basic  file 
records  are  created. 

(c)  Positive  Inventory  Quantity  Adjustment  (2A)  transaction 
(see  Section  4.1.8).  The  quantity  entered  in  this  trans- 
action is  the  balance  of  the  stock  on-hand.  Processing 
of  the  transaction  adds  the  balance  to  the  initial  file 
value  of  zero  generated  when  the  basic  file  records  are 
created,  thus  establishing  the  stock  balance  in  the  com- 
puter file. 
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The  user  may  also  elect  to  enter  the  following  inventory  trans- 
actions : 

(a)  Division  Stock  (DA)  transaction  (see  Section  4.1.3).  This 
transaction  is  used  to  enter  the  identity  of  an  ancillary 
storeroom  and  the  nominal  stock  level  of  the  item  main- 
tained at  that  location.  One  transaction  is  required  for 
each  ancillary  storeroom  at  which  the  item  is  stocked. 

The  file  record  created  through  the  entry  of  this  trans- 
action is  used  during  the  generation  of: 

(1)  Division  Stock  Replacement  report  (see  Section  7.10), 
and 

(2)  Stock  Status  report  (see  Section  7.11). 

(b)  Issue  (8A)  transaction  (see  Section  4.1.7).  This  transaction 
is  used  to  enter  the  date  of  the  last  issue  that  is  kept 

on  file  for  reference.  The  last  issue  date  is  used  as  a test 
value  during  generation  of  the  Low  Usage  Materials  report 
(see  Section  7.12).  If  the  user  elects  to  enter  this 
transaction,  the  quantity  must  be  either  left  blank  or 
be  zero. 

In  addition  to  inventory  transactions.  Purchase  Order  (OA)  trans- 
actions (see  Section  4.1.4)  must  also  be  prepared.  One  transaction  is 
prepared  for  each  inventory  item  for  which  there  is  a partially  or 
completely  unfilled  Purchase  Order.  The  order  quantity  entered  in  the 
transaction  is  the  back  order  quantity — that  is,  the  total  quantity 
ordered  less  the  quantity  received.  The  transaction  prepared  reflects 
the  status  of  the  open  Purchase  Order. 

The  transactions  are  processed  by  executing  the  basic  weekly  job 
twice.  The  procedures  executed  under  each  job  are  INVDATE  and  INVUOl. 
Transactions  input  to  the  first  job  are  the  Item  Characteristices,  Division 
Stock,  Average  Price  Change,  and  Positive  Inventory  Quantity  Adjustment 
transactions.  Issue  and  Purchase  Order  transactions  are  input  to  the  second 
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job.  Entry  of  the  data  base  information  in  this  order  is  necessary 
because: 

(a)  the  system  sorts  transactions  into  ascending  date 
order  before  processing,  and 

(b)  Issue  and  Purchase  Order  transactions  are  dated 
prior  to  the  Item  Characteristics  transaction. 

If  all  the  transactions  were  processed  at  the  same  time,  the 
Issue  and  Purchase  Order  transactions  would  be  rejected  because  the 
item  would  not  have  been  identified  to  the  system. 

If  the  user's  inventory  contains  a large  number  of  items,  the 
workload  to  prepare  the  transaction  is  substantitial.  The  user  may 
wish  to  consider  the  development  of  special-purpose  programs  to: 

(a)  calculate  the  average  unit  prices  required  for  the 
Average  Price  Change  transactions;  and 

(b)  accept  transactions,  containing  all  the  data  values 
required  for  the  AA,  DA,  EA,  2A,  and  8A  transactions, 
and  create  the  separate  transactions  acceptable  to 
the  SIMS  Inventory  System. 

Special-purpose  programs  of  these  types  were  developed  for  the  instal- 
lation of  the  Inventory  System  at  ACTD  and  DTS.  These  programs  were 
tailored  to  the  needs  of  each  property. 

8. 1.3.1  Non-Inventory  Items 

The  SIMS  Inventory  System  is  designed  to  maintain  records  of 
materials  that  are  not  under  inventory  control,  and  to  include  trans- 
actions for  these  materials  in  the  reports  generated  by  the  system. 

The  records  maintained  are  of  purchase  orders  and  receipts.  In  addition, 
a record  of  the  accounting  charge  for  the  materials  is  created  from  the 
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Purchase  Order  transaction.  When  the  receipt  is  processed,  an  equi- 
valent Issue  transaction,  including  the  accounting  charge,  is  created 
and  processed.  The  transactions  for  non- inventory  items  are  displayed 
on  the  Materials  Transaction  History  report  and  are  transferred  to  the 
Transaction  History  File,  where  they  are  available  for  further  processing 
by  the  user. 

The  non- inventory  items  for  which  these  records  can  be  maintained 
include: 

(a)  Free  Stores.  Items  in  this  category  are  of  low  value. 

The  user  does  not  maintain  inventory  control  records 
for  these  items  because  the  cost  of  recordkeeping  is 

a significant  proportion  of  the  materials  value.  How- 
ever, each  item  is  purchased  with  sufficient  frequency 
that  it  is  identified  by  a user-specific  stock  number. 

For  the  SIMS  Inventory  System,  the  user-specified  house 
inventory  number  must  include  the  character  'F'  in  the 
third  character  position.  This  distinguishes  free  stores 
items  from  materials  under  inventory  control  in  the  same 
inventory  class.  This  requirement  is  necessary  as  the 
identifying  character  'F'  is  included  in  the  software, 

(b)  Direct  Changes.  Items  in  this  category  are  those  that 
are  not  purchased  on  a regular  basis.  For  example,  an 
automotive  part,  not  normally  carried  in  inventory,  is 
purchased  to  effect  accident  repairs.  These  items  are 
not  identified  by  user-specified  house  inventory  numbers 
as  they  are  purchased  infrequently.  However,  the  SIMS 
Inventory  System  requires  that  every  item  for  which 
records  are  maintained  must  be  identified  by  a house 
inventory  number  and  that  the  inventory  class  code  for 
direct  charge  items  must  be  'DC'.  The  latter  require- 
ment is  necessary  as  this  class  code  is  include  in  the 
software.  Item  numbers  must  be  unique  to  each  purchase 
of  each  direct  charge  item.  It  is  recommended  that  item 
numbers  be  used  in  ascending  sequential  order  to  avoid 
duplication  in  the  use  of  item  numbers. 
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If  the  user  elects  to  maintain  records  for  free  stores,  an  Item 


Characteristics  (AA)  transaction  is  prepared  for  each  free  stores 
item.  This  transaction  creates  the  basic  file  records  and  identifies 
the  item  to  the  system.  In  addition.  Purchase  Order  transactions  are 
prepared  to  enter  open  purchase  orders  in  the  file.  These  transactions 
may  include  an  accounting  charge. 

If  the  user  elects  to  maintain  records  for  direct  charge  items, 
the  transactions  to  be  prepared  are  limited  to  open  purchase  orders. 

The  entry  of  a Purchase  Order  transaction  for  a direct  charge  item 
creates  the  Item  Characteristics  transaction,  which  is  processed  first, 
establishing  the  basic  file  records,  after  which  the  Purchase  Order 
transaction  is  processed.  The  format  of  the  Purchase  Order  transaction 
provides  for  the  entry  of  a detailed  accounting  charge,  containing  up 
to  15  characters.  As  specified,  the  accounting  charge  contains  the 


following  elements: 


Accounting  Element 


Character  Positions 


Account  number 
Sub-account  number 
Work  order  number 
Vehicle  number 
Fleet  Charge  indicator 


4 

2 

4 

4 

1 


The  value  of  the  fleet  charge  indicator  must  be  '6'. 
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8. 2 Initial  System  Implementation 


The  initial  implementation  of  the  Inventory  System  consists  of: 

(a)  system  installation,  and 

(b)  processing  the  data  base. 

The  steps  undertaken  to  install  the  system  are: 

(a)  a disk  pack  is  initialized  and  the  program  load 
library  (CNl 744. INV. LOAD)  and  the  Inventory 
Control  File  (CN1744. INV. S . CTL)  are  copied  to 
the  pack; 

(b)  the  Inventory  pack  and  the  computer  center  system 
pack  are  connected; 

(c)  the  Inventory  procedures  are  entered  in  the  system 
procedures  library; 

(d)  generation  data  set  indices  are  created  using  an 
IBM  utility  program,  lEHPROGM,  for: 

(1)  Inventory  Master  File  (M. INVENT), 

(2)  Inventory  Class  Master  File  (M. INVCLASS) , 

(3)  Current  Transaction  History  File  (M.TRANDISK) , 

(4)  Transaction  History  File  (M.TRANTAPE) , and  ^ 

(5)  Suspense  File  (SUSPFILE);  and 

(e)  the  allocation  of  space  required  by  data  sets,  other 
than  generation  data  sets,  is  made  using  an  IBM  utility 
program,  IEFBR14.  Space  allocation  is  required  for: 

(1)  Inventory  Active  Master  File  (M.INVACTV), 

(2)  Temporary  Storage  Transaction  File  (M.SRTEMP), 

(3)  Temporary  Suspense  File  (M. INVSUSPN) , 

(4)  Purchase  Order  Transaction  File  (M.POTRANS), 

(5)  Inventory  Constants  File  (S. CONST), 

(6)  Vendor  Reference  File  (M. VENDOR),  and 

(7)  Report  Date  File  (S.DATE). 
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Space  required  for  the  Constants  File  and  the  Report  Date  File  will 
be  a maximum  of  one  track  each.  Allocation  of  space  for  the  remainder  of 
the  above  data  sets  depends  on: 

(a)  the  number  of  items  for  which  records  are  to  be 
maintained, 

(b ) the  number  of  vendors  for  which  records  are  to  be 
maintained,  and 

(c)  the  volume  of  transactions  to  be  processed  during 
system  execution. 

After  the  installation  is  completed,  the  data  base  is  processed 
through  the  execution  of  three  jobs. 

rne  first  job  consists  of  the  initialization  of  the  Vendor  Reference 
File  through  execution  of  the  procedure  INVEND.  The  Vendor  File  Start-up 
Cards  constitute  the  input.  Output  includes  a listing  of  the  contents 
of  the  ISAM  file  after  initialization. 

After  this  job  has  been  completed,  the  weekly  job  ACTINVWK  is  ex- 
ecuted twice  to  process  the  constants  data,  the  inventory  data,  and  the 
Purchase  Order  data  (see  Section  8.1.3).  'fhe  job  consists  of  the  exec- 
ution of  the  procedures  INVDATE  and  INVUOl,  which  constitute  the  basic 
inventory  job  (see  Table  5.1-0). 

For  the  first  execution  of  this  job  only,  the  job  deck  must  include 
override  cards,  immediately  after  the  transaction  cards,  for  four  data 
sets.  Normally,  the  most  recent  generation  of  these  data  sets  are  input 
to  the  job.  At  this  stage  of  system  start-up,  the  Inventory  Master  File, 
the  Inventory  Class  Master  File,  the  Suspense  File,  and  the  Transaction 
History  File  do  not  exist.  Dummy  data  sets  must  be  substituted.  This  sub- 
stitution is  accomplished  by  the  inclusion  of  the  following  overrides  for 
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procedure  INVUOl: 

//IWV03.ITRAN09  DD  DUMMY, DCB=(RECFM=F,BLKSIZE=80) 

//IiW05. IMSTR01  DD  DUMMY, DCB=(RECFM=F, BEKS IZE=60) 

//INV05. IMSTR03  DD  DUMMY, DCB=(RECFM=F,BLKSIZE=60) 

7/INV07.IMSTR01  DD  DUMMY,DCB=(RECFM=F, BLKSIZE=127) 

It  should  be  noted  that  the  system  expects  transaction  input  on 
punched  cards.  This  may  be  changed  to  tape  or  disk  input  by  an  appro- 
priate change  to  the  JCL  for  procedure  INVUOl . 

Input  to  the  system  consists  of  transaction  data  in  a format 
acceptable  to  the  system.  Section  4.1  describes  the  standard  input 
formats.  If  the  user  prefers  to  use  formats  that  are  specific  to  the 
property,  a user  input  processor  program  must  be  written.  An  illustra- 
tive example  of  such  a program  is  described  in  Section  7.1.  The  input 
processor  program  must  convert  transactions  to  the  standard  formats 
acceptable  to  the  Data  Acceptance  program,  DA300. 

The  Data  Acceptance  program  is  executed  as  the  step  INV03,  under 
the  procedure  INVUOl , of  the  regular  weekly  job  ACTINVWK  (see  Section 
5.1).  The  transaction  input  to  step  INV03  is  on  unit  ITRAN08.  The 
file  referenced  by  unit  ITRAN08  miist  be  the  output  from  the  user 
processor  program,  which  is  executed  as  step  INVOl  of  procedure  INVUOl. 

If  the  user  elects  to  use  the  standard  inventory  transaction 
formats,  the  user  input  processor  program  is  not  required.  Tlie  user 
may  input  transactions  directly  to  the  Data  Acceptance  program  via  unit 
ITRAN08.  The  data  source  may  be  from  cards,  disk,  or  tape. 
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8 . 3 Generation  and  Analysis  of  Reports 


Each  of  the  two  jobs  executed  to  process  the  data  base  produces 
printed  output.  The  output  of  the  procedure  INVEND  includes  a listing  of 
the  contents  of  the  Vendor  Reference  File.  Execution  of  the  procedure 
INVUOl  produces  the  Constants  File  Edit  report  of  constants  transactions 
and  the  Materials  Transaction  History  report  of  both  inventory  and  pur- 
chasing transactions.  The  contents  of  these  reports  include  all  trans- 
actions successfully  processed  during  initial  system  implementation.  The 
user  should  analyze  these  reports  to  verify  that  the  data  were  entered 
correctly. 

Execution  of  the  procedure  INVUOl  also  produces  the  Inventory 
Transaction  Edit  report,  displaying  transactions  that  failed  to  meet 
either  edit  or  update  criteria.  This  report  should  be  analyzed  to 
determine  the  reason  for  the  rejection  of  each  transaction  displayed. 
Error  messages  are  displayed  on  the  report  to  assist  the  user  in  the 
analysis . 

This  analysis  of  start-up  data  should  be  performed  before  any 
further  system  runs  are  made.  Rejected  transactions  must  be  corrected 
and  resubmitted  to  the  system. 
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